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1-0 ABSTRACT 


THE RKOG PERFORMANCE EXERCISER PROGRAM WILL EXERCISE IN A KABDOP 
OVERLAPPED WMANWEP 1 TO 8 RKOG6 DISK DRIVES ATTACHED TO THE SAME REO6 
UNIBUS CONTROLLER IW A DEDICATED STAND-ALONE MODE. 


DRIVES UNDER TEST CAN BE ADDED TO OR DROPPED FROM THE TESTING SEQUENCE 
BY OPERATOR COMMAND. 


AT ANY GIVEN POINT IN TIME, THE MEXT DRIVE ON WHICH AW OPERATION YS TO 
BE INITIATED IS CHOSEN RANDOMLY FROM AMONG THE REOG DRIVES UNDER TEST 
NOT HAVING ANY ERROR CONDITIONS PRESENT AND NOT CURRENTLY UNDERGOING 
ERROR RECOVERY. THE COMMAND IS THEN CHOSEN RANDOMLY FROM THE 
FULLOWING SET OF COMMANDS: 


PEAD 
WRITE 
WRITE FOLLOWED BY WRITE CHECK 


THEN THE CYLINDER, TRACK, SECTOR, WORD COUNT, AWD DATA ARE DETERMINED 
RANDOMLY. THE DATA WRITTEN IS RARDOMLY SELECTED FROM A SET OF FIXED 
DATA PATTERWS. TO OPTIMIZE THE THROUGHPUT ON THE RKO6 CONTROLLER EACP 
DATA TPANSFER COMMAND IS TRANSLATED TO AM EXPLICIT SEEK COMMAND 
FOLLOWED BY THE DATA TRANSFER COMMAND. 


DRIVE ERRORS ARE QUEVED UP AS THEY OCCUR. WHILE ERROR RECOVERY IS 
BEING PROCESSED ON OWE DRIVE ALL OTHER DRIVES RAVING WO ERRORS WILL BF 
EXECUTING ORDERS GENERATED RANDOMLY AS DESCRIBED ABOVE. EACH ORTVE 
ERROR ITS PROCESSED ON A FIRST-IN-FIRST-OUT BASIS. THIS MEANS THAT A 
DRIVE ERROR WILL BE REPORTED AND ERROR RECOVERY COMPLETELY PROCESSED 
BEFORE THE WEXT DRIVE ERROR IS REPORTED AND ERROR PROCESSING RAS 
BEGUN. ERROR RECOVFRY TS PROCESSED AS DESCRIBED IN THE REFO6 DISK 
DRIVE SPECIFICATION. 


REPORTIVG OF SYSTEM ERRORS SUCH AS CONTROLLER PROBLEMS WILL BE 
IMMEDIATE UPON OCCURRENCE, WOT DEFFERRFD, PERHAPS CAUSTNG PREMATURE 
PROGRAM TERMINATION. 


PERFORMANCE STATISTICS ARE KEPT ON EACH ORIVE. THESE STATISTICS 
INCLUDE BOTH OPERATION COUNTS AWD ERROR SUMMARY INFORMATION. (SEE 
SECTION 6.1) THESE STATISTICS WILL BE INITIALTZcD WHEN TESTING BEGINS 
ON A ORIVE. AT ANY TIME AFTER TESTING BEGINS ON THE DRIVE(S) ONDER 
PERFORMANCE EVALUATIOK, THE OPFRATOR CAN DEMAND THESE PERFORMANCE. 
STATISTICS. IF A REAL TIME CLOCK IS AVAILIBLE, THE OPERATOR HAS THE 
OPTION OF HAVING THE PROGRAM CIVE PERIODIC PERFORMANCE SUMMARIES. 


OWCE A PAPTICULAR DRIVE HAS AN UNRECOVERAPLE ERROP (OTHER THAN A DATA 
TRANSFE® AND SEE*® INCOMPLETE), THAT ORIVE WILL BE AUTOMATICLY 
DEASSIGNED. 


ONCE A PARATICULAR DRIVE 4AS EXCEEDED AN ERPOR THRESHOLD (DATA 
TRANSFER OR SEEK) SPECIFIED FOR A DRIVE, THAT RIVE WILE BE 
AUTOMATICLY DEASSIGNED UNLESS SWITCH 4 IS SET. 
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OWCE A PARTICULAR DRIVE HAS EXCEEDED THE MAXIMUM HUMBER OF PEPMITTED 
OPERATIONS FOR THAT DRIVE, THE ORIVE WILL BE AUTOMATICALLY DESELECTED 
UNLESS SWITCH 5 IS SET. 


2-0 REQUIREMENTS 


2-1 FQUIPMENT 


PDP-11 WITH AT LEAST 16K OF MEMORY 

CONSOLE TERMINAL 

DECTAPE, PAPER TAPE PEADER? OF DECDISK 

RK611 CONTROLLER 

1 TO 6 RKO6 DISK DRIVE WITH FORMATTED PACK (16 BIT FORMAT) 
REAL TIME CLOCK (KW11-P OR KW11-L OPTIOWAL) FOR INTERVAL 


PERFORMANCE REPORTING AND TIME ASSOCIATIONS WITH FRROR 
REPORTS 


2-2 PRELIMINARY PROGRAMS 


THE RKOK SUBSYSTEM IS ASSUMED TO BE BASICALLY OPERATIONAL AWD FREE OF 
HARD FAULTS. TRE FOLLOWING RKOG6 PROGRAMS ARE ASSUMED TO BE RUNNING 


WITHOUT 


ERROR BEFORE THIS PROGRAM IS RUN: 

RK611 DISKLESS CONTROLLER DIAGNOSTICS 

RKO6 DRIVE DIAGNOSTICS 

RK611 FUNCTIONAL CONTROLLER DIAGNOSTIC 

RKOG6 SUBSYSTEM VERIFICATION 

RKO6 PACK FORMATTER CIF PACKS ARE UNFORMATTED) 


SEQ 0004 


Di 





3.0 OPERATING PROCEDURE 


3-1 LOADING PROCEDURE 





THE PROGRAM CAN BE LOADED FROM PAPER TAPE USING APSOLUTE LOADER OR 
FROM ANY MEDIA SUPPORTED BY XXDP. 


3-2 STARTING PROCEDURES 


AFTER THE PROGRAM IS LOADED, THE OPERATOR STARTS THE PROGRAM AT ORE OF 
THE FOLLOWING LOCATIONS: 


LOCATION 


204 


214 


NOTES: 


FUNCTION 


INITIALIZE ALL DRIVE STATISTIC TABLES, THE RANDOP 
NUMBER SEED, AND USE DEFAULT SYSTEM PARAMETERS. 
THE PROGRAM WILL THEN TYPE READY TO BEGIN 
PERFORMANCE TESTING. 


RESTART PROGRAM. IF DRIVE ITS UNDER TEST, CONTINUE 
TESTING DRIVE AND DO NOT DESTROY STATISTICS. IF 
PACK IS BEING WRITTEN, START WRITING PACK FROY THE 
BEGINNING. THE PROGRAM WILL THEN TYPE READY TC 
BEGIN PERFORMANCE TESTING. 


START PROGRAM AND ALTER SYSTEW PARMETERS. THE 
PROGRAM WILL THEN IDENTIFY ITSELF AND ASK FOP THE 
PARAMETERS AS DESCRIBED IN SECTION 3.3.2. THE 
PROGRAM WILL THEN TYPE READY TO BECIN PERFORMANCE 
TESTING. 


IF A POWER FAIL OCCURS, THE PROGRAM WILL 
AUTOMATICALLY PERFORM THE RESTART FUNCTION. 


THE PROGRAM IS NOW IN AW IDLE LOOP WAITING FOR THE INITIATION OF RKO6 


DRIVE TESTING. 


THE OPERATOR THEN STARTS PERFORMANCE EVALUATION OF THE R06 ORIVE(S) 
BY TYPTNG A CONTROL-C <C> FOLLOWED BY A TW OR PN AS DESCRIBED IN 
SECTION 4.1. IF THE PACK DOES NOT HAVE THE PROPER RANDOMLY CROSEN 
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PREDETERIMED TEST PATTERNS, THE OPERATOR MUST USF THE WH COMMAND AS 
DESCRIBED IW SECTION 4.1 BEFORE INITIATING THE PERFORMANCE EVALUATION 
SEQUENCE ON THAT DRIVE. 


3.3 SYSTEM PARAMETERS 


3-3-1 ODIPECT MEMORY ALTERATION 


AS PART OF THE PROGRAP START-UP PROCEDURE, THE FOLLOWING SYSTEY 
PARMETE°S WILL BE LOADED BY THE OPERATOR OR DEFAULTED BY THE PROCKAM. 
THE OPEPATOR MUST PHYSICALLY ALTER THE APPROIATE MEMORY LOCATIONS TO 
CHANGE THESE VALUES. 


PARAMETER TAG DEFAULT VALUE 
- KW11-P STATUS REGISTER ADDRESS SLKCSR 172540 

- KW11-P COUNTER BUFFER ADDRESS . $LKCSB 172542 

- KW11-P VECTOR ADDRESS SLPVEC 104 

- KW11-L STATUS REGISTER ADDRESS $LKS 177506 

- KW11-L VECTOR ADDRESS SLLVEC 100 

- SYSTEW POWER (HERTZ) HZ 60( DECIMAL) 


3-3-2 PROGRAP MODIFIED PARAMETERS 


THE FOLLOWING PARAMETERS ARE MODIFIED BY A 214 PROGRAM START. 


A <CR> WILL DEFAULT CURRENT PARAMETERS. A CONTRGL Z <°Z> <CRD> WILL 
DEFAULT ALL THE REST OF THE PARAMETERS. A CONTROL C <*C> <CR> WILL 
RETURN TO FIRST PARAMETER ENTRY REQUEST FOR THIS ORIVE. A ROBOUT 
CANCELS THE LAST CHARACTER TYPED. A CONTROL U <“0> CANCELS LINE BEING 
TYPED. ALL ENTRIES MUST BE TERMINATED WITH CARRIAGE RETURN. 


Fl 





SEG 0007 ( 
PARMETER DEFAULT VALUE ’ 
- CPU IDENTIFIER (OCTAL NUMBER 0-377 0 
FOR DUAL ACCESS PORT DISCRIMINATION) 
- OVERLAY OF LOADER BY PROGRAM? "0 
(ALLOWS GREATER EXPANSION i 


OF MEMORY FOR BUFFER SPACE IF LOADER { 
IS OVERLAVED) 


- MAXIMUM DATA BUFFER (SEE NOTE) SEF NOTE 
UP TO 5868 (23 SECTORS) { 
- NUMBER OF DATA WORDS COMPARED 3 wORDS 


PER READ (0 - MAXIMUM BUFFER LENGTH) 

EACH READ COMMAWD ISSUED BY THE PROGRAM | 
AAS AN IMPLICIT DATA COMPARISON ASSOCIATED 

WITH IT VERIFYING THAT THE DATA READ IS 

OWE OF LEGAL RANDOM PATTERNS. | 


- INTERVAL BETWEEN AUTOMATIC PERFORMANCE WO AUTOMATIC 
TYPE-OUTS (EVERY 1-255 MINUTES OR NO PERFORMANCE 
AUTOMATIC PERFORMANCE TYPE-OUTS) TYPE-OUTS 
- RK611/RK06 UNIBUS ADDRESS 177440 
- RK611/RK06 VECTOR ADDRESS 210 
- RK611/RKO6 PRIORITY 5 | 
( 
WOTE 


THE PROGRAM WILL SELECT A MAXIMUP BUFFER y 
SIZE WHICH IS DETERMINED BY THE MEMORY 

AVAILABLE. THE MAXIMUM BUFFER SIZE 

ASSIGNED BY THE PROGRAM WILL BE 58868 | 
WORDS. THE DEFAULT VALUE OF “THIS 

PARAMETER WEIGHTS THE OPERATIONS TOWARDS 

MAXIMIZING DATA TRANSFERS PER UNIT OF { 
TIME. BY CHANGING THIS PARAWETER TO 

1 SECTOR (256 WORDS), THE OPFRATIONS 

WILL BE WEIGHTED TOWARDS MAXIMIZING | 
SEEKS PER UNIT OF TIME. 





3.4 SWITCHES 


3-4-1 SWITCH 15 


sw<eis> =1 


3-4-2 SWITCH 14 


SW<14> = 0 


HALT ON ERROR 


IF THIS SWITCH IS SET, THE PROGRAM WILL NOT ISSUE 
AROTHER COMMAND TO THE RKOG6 SUBSYSTEM WHES AR 
ERROR OCCURS AND THE PROGRAM WILL ALT IR THE 
SYSPAC ERROR HANDLER. IF THE OPERATOR DESTRES TO 
CONTINUE FROM WHERE THE PROGRAM LEFT OFF, THE 
OPERATOR SIMPLY PRESSES THE CONTINUE SWITCH OW THE 
CONSOLE PANEL AND THE PROGRAM CONTINUES WITH THE 
WEXT RANDOMLY GENERATED COMMAND. 


WORMAL OPERATION 


THE OPERATION THE PROGRAM IN REGARD TO ORIVE 
SELECTION AWD COMMAND GENERATION TS WORMAL. 
NORMAL OPERATION IS TO RAWDOMLY SELECT A ODORIVE, 
STORE THE PREVIOUS OPERATION EXECUTED ON THAT 
DRIVE, AND GENERATE A WEW RANDOW OPERATION TO BE 
EXECUTED ON THAT DRIVE. THE CEWERATED OPERATION 
INCLUDES RANDOMLY GENERATED VALUES FOR THE 
FOLLOWING PARAMETERS: 


ORIVE COMMAND 
CYLINDER ADDRESS 
TRACK ADDRESS 
SECTOR ADDRESS 
WORD COUNT 

DATA PATTERN 


THESE WALUES ARE STORED AS THE PREVIOUS OPERATION 
WHEN A WEW OPERATION ITS GENERATED. 

IT IS IMPORTANT TO NOT THAT AT ANY POINT IN TIME 
THERE IS BOTH A CURRENT OPERATION AND A STORED 
PPEVIOUS OPERATION ASSOCIATED WITH EACH ORIVE 
UNDER TEST. THE CURRENT OPERATION MAY HAVE 
ALREADY SEEN EXECUTED AND A NEW COMMAND HAS NOT 
YET BEEN GERERATED OR THE COMMAND IS WAITING TO BE 
EXECUTED. 
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sw<14> = 1 


USE AGE 


324.3 SWITCH 13 


Sw<13> = 1 


3-4-4 SWITCH 12 


LOOP ON CURRENT OPERATIONS (TEST) 


DO WOT GENERATE WEW RANDOW OPERATION BUT CONTINUE 
TO EXECUTE CURRENT OPERATIONS. 


WHEN SWITCH 14 IS SET THE GENERATION OF A WNEW 
OPERATION IS INFIBITED AND THE PROGRAM OPERATES AS 
FOLLOWS? 


1.) A DRIVE TS RANDOMLY SELECTED. 

2-) A SEEK IS EXECUTED ON THE DRIVE TO THE 
CYLINDER ADODRESS STORED TH THAT DRIVE’S 
PREVIOUS OPERATION. 

3-) THE CURRENT OPERATION FOR THAT ORIVE IS 
EXECUTED. 

4.) REPEAT TRE ENTIRE PROCESS. 


THIS SWITCH CAN BE USED IN CONJUNCTION WITH 
SWITCH 15 TO EWABLE THE REPETITION OF A RANDOMLY 
GENERATED OPERATION. THE OPERATOR WOULD START 
WITH SWITCH 15 SET AND SWITCH 14 RESET. WHER THE 
PROGRAM HAS INDICATED THAT AN ERROR HAS OCCURRED 
BY HALTING. THE CURRENT OPERATION FOR THE ORTVE 
IN ERROR WILL WOT HAVE BEEN MODIFIED WHEN THE 
PPOGRAM HALTS. THE OPERATOR CAN THEN CAUSE ALL 
DRIVES TO LOOP ON THEIR INDIVIDUAL CURRENT 
OPERATIONS BY SETTING SWITCH 14, RESETTING 
SWITCH 15, AND HITTING CONTINUE. 


TO RELP ISOLATE PROBLEMS, THE OPERATOR CAN DROP 
THE RKOG DRIVE(S) FROM THE TEST SEQUENCE AT ANY 


TIME BY USING THE DN COMPAND AS ODESCRIPED IN 
SECTION 4.1. 


INHISIT ERROR TYPE OUT 


NO EFFECT. 


sto cocs 


i | 





3-4-5 SWITCH 11 


3-4-6 SWITCH 10 


SWw<10> = 1 


304-7 SWITCH 9 


3-4-8 SWITCH 6 


324.9 SWITCH 7 


3.4.10 SWITCH 6 


sw<6> = 1 


324-11 SWITCH 5 


Ssu<S> = 1 


NO EFFECT. 


RING TELETYPE BFLL IF ERROR 


NO EFFECT. 


NO EFFECT. 


NO EFFECT. 


INHIBIT AUTOMATIC DESELECT FOP CLEARABLE UWNSAFES, 
SPEED LOSS, AWD AC LOW. 


INHIBIT AUTOMATIC DRIVE DEASSIGWHMENT IF OPERATION 
COUNT THRESHOLD IS EXCEEDED. 





SEQ 0011 ( 
304-12 SWITCH 4 ( 
sw<4> = 1 INHIBIT AUTOMATIC DRIVE DEASSICNWENT IF ERROR 
THRESHOLD EXCEEDED. ( 
( 
324.13 SWITCH 3 
( 
swe3> = 1 DISPLAY ERTIRE SECTOR READ PEFORE STARTING RETRY 
SEQUENCE “ ' 
ALL HARDWARE DETECTED DATA ERRORS WILL BE RETRIED 
ON A SECTOR BASIS. If THIS SWITCH IS SFT, THE 
DATA SECTOR IN ERROR WILL BE DISPLAYED ENTIRELY ( 
BEFORE THE RETRY SEQUENCE BEGINS ON THE SECTOR If 
ERROR. 
3.4.14 SWITCH 2 ( 
wO EFFECT. 
( 
3.4.15 SWITCH 1 
{ 
swel> =1 INHIBIT SOFTWARE DATA COMPARISONS 


THE IMPLICIT DATA COMPARISONS ASSOCIATED WITH EACR ( 
READ WILL WOT BE PERFORMED WHEN THIS SWITCH IS 
SET. THE ONLY DATA CHECKING PERFORWED WILL BE 
HARDWARE DATA CHECKING. ( 


324-16 SWITCH 0 


NO EFFECT. 


3.5 RUN TIME 


THIS PROGRAM TS DESIGNED TO RUN FOR AN EXTENDED PERIOD OF TIME. 
(ESTIMATED RUM TIME WITH PRESENT DEFAULT PARAMETERS I[S APPROXIMATELY 
250 HOURS PER DRIVE.) MEANINGFUL INFORMATION CAN STILL PE ODERIVED BY | 
RUNNING THIS PROGRAM FOR AN HOUR CK LESS SINCE STATISTICS ARE TAKEN AS 
THE PROGRAM IS RUNNING. 





4.0 OPERATING PROCEDURE 


4.1 OPERATOR COMMANDS 


AFTER THE PROGRAM IS LOADED AND HAS PRINTED OUT “READY TO PECIR 
PERFORMANCE TESTING", THE OPERATOR CAN ONLY TYPE A CONTROL-G <C> OR 3 
CONTROL-C <C>. 


A CONTROL-G <G> IS USED FOR SOFTWARE SWITCH REGISTER MODIFICATION. 


UPON RECEIVING A CONTROL-C <C> THE PROGRAM WILL RESPOND WITH “PLEASE 
TYPE COMMAND". THE FOLLOWING TWO CHARACTER COMMANDS FOLLOWED BY 
CARRIAGE RETURN WILL PE THE ONLY COMMANDS ACCEPTED: TH, Pl, OR, Si, 
WN. 


THE SECOND CHARACTER W=O,l,ecog7 OR A DESIGNATES WHICH DRIVE IS 
REFERENCED BY THE COMMAND. IF W=A, ALL ADDRESSABLE DRIVES ARE 
REFERENCED. THE DESCRIPTION OF EACH OPERATOR COMMAND FOLLOWS: 


- TH INITIATE TESTING OF DRIVE & AND USE £PREVIOUS 
PARAMETERS. (DEFAULT PARWETERS APE USED IF PR COMMAND 
RAS NOT PREVIOUSLY BEER ISSUED TO THE DRIVE(S) AT THE 
BEGINNING OF THEIR TEST SEQUENCE.) IF WeA, IWITIATE 
TESTING ON ALL DRIVES. 


- PN THIS COMMAND HAS TWO USES: 


1.) CHANGE CURRENT DRIVF PARAWETERS AND INITIATE 
TESTING OW DRIVE 4H. 


?-) CHANGE CURRENT ORIVE PARAMETERS AND CONTINUE 
TESTING ON DRIVE &. 


IN BOTH CASES THE PROGRAM WILL THEW ASK FOR PARMAFTERS 
™’ THE ORDER AS DESCRIBED IR SFCTION 5.5. A <CR> 
INDICATES DEFAULT THIS PARAMETER AND A CONTROL-Z <2> 
INDICATES THE THE REST OF THE PARAMETERS FOR THIS DRIVE 
ARE TO BE DEFAULTED. 


IF N=A, PERFORM PN COMMAND OW ALL DRIVES. 
- ON DROP DRIVE FROM TESTING SEQUENCE AND PPINT PERFORMANCE 


SUMMARY. If W=A, OROP ALL CURRENTLY BEING TFSTED 
DRIVES FROM TESTING SEQUENCE 


Al 





- Su DEMAND PERFORMANCE SUMMARY ON DRIVE W. IF =A DEMAND 
PERFORMANCE SUMMARY ON ALL CURPENTLY BEING TESTED 
DRIVES. 

- Wn WRITE AND VERIFY THE RKOG DISK PACK OM DPIVE BH WITH A 


RANDOM SET OF LEGAL PATTERNS. THIS IS USED PRICK TO 
THE START OF THE TEST SEQUENCE TO GUARENTEE THAT THE 
PROPER PREDETERMIBED TEST PATTERSS HAVE BEEN WRITTER OF 
THE PACK. (SEE APPENDIX A FOR DETAILS) AFTER THE PACK 
HAS BEEN COMPLETELY WRITTEN TESTING WILL BEGIN USTNC 
THE PREVIOUS PARAMETERS AS DESCRIBED IN THE TH COMMAND. 


WRITING OF THE PACKS WILL TAKE 4 TO 5S MINUTES PER PACK 
WITH MAXIMUY BUFFER SIZE. THE WRITING OF THE PACK PAT 
TAKE LONGER IF THE MAXIMUM BUFFER SIZE SPECIFIES IS 
SMALL. RANDOM EXERCISE CAN BE DONE OR SOME DRIVES 
WHILE EXERCISE OW OTHER DRIVES ARE IW PROGRESS. 


NOTES: IF AW ERROR OCCURS DURING THE DRIVE ASSIGHAENT SEQUENCE 


OR WHILE WRITING THE RAWDOM SET OF LEGAL PATTERNS, THE 
ERROR WILL BE REPORTED AND TESTING WILC NOT START. 


EXAMPLES: 
COMMAND SEQUENCE ACTION TAKEN 


TACCR> IWITIATE TESTING OW ALL DRIVES OF SYSTEM 
T1<CR> INITIATE TESTING OW DRIVE 1 
T3<CR> INITIATE TESTING OW ORIVE 3 

(TESTING STILL CONTISUES ON DRIVE 1) 
SACCR> GATHER STATISTICS OW ALL DRIVES UNDER TEST. 
DACCR> DROP ALL DRIVES UNDER TEST. 


4-2 ORIVE PARAMETERS (PER EACH DRIVE) 


A SET OF THESE PARAMETERS EXISTS FOR EACH DRIVE. A TH COMMAND WILL 
UTILIZE THE PREVIOUSLY ESTABLISHED PARAMETERS FOR THE DRIVE(S). A PN 
COMMAND WILL ALLOW THE OPERATOR TO ALTER ALL THE PARAMETERS FOR THE 
DRIVE(S). 


A <CR> WILL DEFAULT CURRENT PARAMETERS. A CONTPOL 2 <*Z> <CR> WILL 
DEFAULT ALL THE REST OF THE PARAMETERS. A CONTROL C <*C> <CR> WILL 
RETORN TO FIRST PARAMETER ENTRY REQUEST. FOR THIS DRIVE. A kUBOUT 
CANCELS THE LAST CHARACTER TYPED. A CONTROL 0 <“U> CANCELS LINE BEING 
TYPED. ALL EWTRIES MOST BE TERMINATED WITH CARRIAGE RETURE. 


Ml 








PARAMETER 


MAXIMUM CYLINDER FOR START OF DATA TRANSFER 
ntutwon CYLINDER FOR START OF DATA TRANSFFR 
MORTHON TAACK FOR START OF DATA TRANSFER 
stn TWON Teac FOR START OF DATA TRANSFER 


MAXIMUM SECTOR FOR START OF DATA TRANSFER 
MINTMUM SECTOP FOR START OF DATA TRANSFER 
0 - 25 
RATIO OF READ/WRITE 
EVERY COMMAND RANDOMLY CENERATED BY THE 
PROGRAM WILL PE EITHEP A READ OR A WRITE. 
FOR EACH DRIVE ONE CAN WEYGHT THE COMMANDS 
TOWARDS READING OR WRITING. THE POSSIBLE 
WEIGHTING RATIO°S ARES 


PEAD ONLY =0 
7/1 =1 
3/1 =2 
5/3 =3 
1/1 =4 
W5 25 
1/3 =6 
1/7 27 


CO WRITE CHECK AFTER EVERY WRITE COMMAND 
OTHERWISE, WRITE CHECK COMMANDS WILL BE 
ISSUED RANDOMLY AFTER WRITE COMMANDS. 

CORPECTABLE READ ERROR THRESHOLD 

UNCCRRECTABLE RFAD ERROP THRESHOLD 

SEEK ERROR THPESHOLD 

IWHTBIT ERROR CORRECTION 

OPEPATION COUNT THRESHOLD*65K 

DATA TRANSFER THRESHOLD*S20F WOFDS 

SAMPLED COMPAPES 

UP TO S EXCLUDED PACK AREAS 
(NO DATA TRANSFER WILL PE DONE TO 

THESE AREAS.) 


DEFAULT VALUE 


632 
0 
2 


10 
5 
5 
WO 
4.290*10**9 
291*10**12 
YES 
NO EXCLUDED 
PACK AREAS 


sec 0014 
- 


Aa 








4.2.1 FORMATS FOR PACK AREA EXCLUSION 


FORMAT ACTION 
CYL<CR> ALL TRACK OW CYLINDER 
SPECIFIED WILL BE EXCLUDFD. 
CYL, TRKCCR> THE EWTIRE TRACK WILL 
BE EXCLUDED. 


CYL1,TRK1,CYL2,TRK2<CR> ALL TRACKS FROM CYLINDER 1 
TRACK 1 TO AWD [WCLUDING 
CYLINDER 2 TRACK 2 
WILL BE EXCLUDED. 


4-3 DIAGNOSTIC DUMP 


DUE TO THE COMPLEXITY OF THIS PROGRAM A DUMP OF THE PROGRAM TABLES 
MUST ACCOMPANY EACH PROBLEM REPORT. THIS DUMP IS PROVIDED IN THE 
PROGRAM AND IS ACTIVATED BY STARTING THE PROGRAM AT LOCATION 220. 
THIS DUMP WILL PRINT THE PROCESSOR REGISTERS WHEN THE DUWP IS CALLED. 
IT WILL THEN PRINT ABOUT 12-15 TELETYPE PAGES OF SOFTWARE TABES 
WECESSARY TO DETERMINE WHAT THE PROBRAM WAS DOING AT A GIVER TIME. 
APPROXIMATE TIME OF DUMP IS 10-12 MINUTES. 


5-0 PROGRAM DESCRIPTION 


THIS PROGRAM ASSUMES THAT ONLY THE PATTERNS WRITTEN BY THIS PROGRA¥ 
WILL BE ON THE PACK. TO PRECONDITION THE PACK A WN COMMAND MUST BE 
DOWE. PACK SERIAL, DRIVE SERIAL NUMBER, THE TIME, AND DRIVE W ONDER 
TEST WILL BE PRINTED AT THE END OF PACK PRECONDITIONING. THE 
OPERATION OF THE PROGRAM IS DEPENDENT ON THE SWITCH REGISTER, SYSTEM 
PARAMETERS, AND DRIVE PARAMETERS. DRIVES MAY BE DROPPED FROM TEST BY 
USING THE DN COMMAND. If A ORIVE IS ORGPPED FOR ANY REASON, 
PERFORMANCE STATISTICS WILL AUTOMATICALLY BE PRINTED. 


Sel PROGRAM RESTRICTIONS 


THIS PROGRAM WILL NOT RUN IN CHAIN MODE UNDER XXDP. WO END-OF-PASS 
INDICATOR IS PROVIDED FOR ACT. THE APT PROTOCOL HAS NOT BEEN 
DETERMINED YET. 


B2 
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THE PERFORMANCE SUMMARY WILL CONTAIN THE FOLLOWING THFORMATION: 


6.2 


PRINT OUTS 


PERFORMANCE SUMMARY TYPEOUT 


DRIVE NUMBER 
DRIVE SERIAL NUMBER 
TIME OF REPORT (IF REAL TIME CLOCK [S AVAILIABLE) 
NUMBER OF ORDERS PERFORMED BY DRIVE 
NUMBER OF SEEK OPERATIONS PERFORMED 
TOTAL HUMBER OF WORDS WRITTEN BY DRIVE*65K 
TOTAL WOMBER OF WORDS READ BY DRIVE*65K 
WUMBER OF SOFT DATA ERRORS 
(ECC CORRECTABLE) 
(REREAD CORRECTABLE) 
(OFFSET CORRECTABLE) 
NUMBER OF HARD DATA ERRORS 
NUMBER OF SEEK INCOMPLETES 
NUMBER OF MISPOSITIONING ERRORS 
TOTAL WUMBER OF ALL OTHER ERRORS. 


FRROR REPORTS 


THE ERROR REPORTS WILL CONTAIN THE FOLLOWING INFORMATION: 


DRIVE NUMBER 

DRIVE SERIVAL YUMBER 

TIME ERROR OCCCURPED (IF REAL TIME CLOCK IS AVAILTAPLE) 
DESCRIPTION OF ERROR 

PRESENT COMMAND 

PREVIOUS COMMAND 

PRESENT POSITION 

PREVIOUS POSITION 

ALL DRIVE STATUS REGISTERS 

ALL CONTROLLER REGISTERS 

MEMORY ADDPESS, GOOD DATA AND RAD DATA (TF DATA FRROP) 
OFFSET VALUE (IF APPLICABLE) 

HEADER READ (IF MISPOSITIONING ERROR) 

ECC PATTERN AND POSITION REGISTER IF DATA CHECKED 


Ca 








FIGURE A-1 SHOWS THE DATA EXPECTED BY THIS PROGPAM FOR EACH SECTOR OF 
THE REFO6 PACK USED BY THIS PROGRAM. 


15 87 43 0 WORD 
i Cpu ID 1 PAT | Pat - s 

{ PATC (WN) 4 PATC (R") ‘1 

| PANDOM PATTEPN ! 2 70 
] « Nel 
i Se — — — — — — — — — — — — — — — — — — — — — — —— —— —— — — ——— —— —— —— —— —— ———— ——22— 

J ZERO PILL 1 We? TO 
] ' 255 
Reem wm ome eee ew oe — — — —— coe — ——— — eee — —— cece — ocecen® 

cpu ID CPU IDENTIFIER SUPPLED BY THE OPERATOR 
PaT PATTERW USED 

PATC PATTERN COUNT (NUMBERR OF 


WORDS OF PATTERN WRITTEN) 


FIGURE A-1 
EXPECTED DATA FORMAT 
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SEC 0018 ( 

DATA PATTERNS USED ; 

PATTERN 0 PATTERN 1 PATTERN 2 PATTERN 3 
165555 026455 007417 052525 
133333 15132? 170360 12575? 

165555 026455 007417 052525 4 
133333 026455 007417 052525 
165555 151322 170360 125252 

133332 151322 170360 12525? ( 
165555 026455 007417 052525 
133333 026455 007417 052525 

165555 026455 007417 052525 ( 
133333 151322 170360 12525? 
165555 151322 170360 125252 

133333 151322 170360 125252 ( 
165555 026455 007417 052525 
133332 026455 007417 052525 

165555 026455 007417 052525 ( 
133333 026455 007417 052525 
165555 151322 170360 125252 

133333 15132? 170360 125752 ( 
165555 151322 170360 125252 
133333 151322 170360 125252 

165555 026455 007417 052525 ( 
1332333 026455 007417 052525 
165555 026455 007417 052525 

133333 151322 170360 125252 ( 
165555 151322 170360 125252 
133333 15132? 170360 12525? 

165555 026455 007417 052525 ; ( 
133333 026455 007417 052525 
165555 151322 170360 125252 

133332 151322 170360 125252 ( 
165555 026455 007417 052525 

133333 151322 170360 125252 ( 

( 

( 

( 

( 

( 

Ea ( 








SEQ 0619 q 

PATTERN 4 PATTERN 5 PATTERN 6 PATTERN 7 ‘ 
000000 000000 000001 000001 
010421 177777 000003 000002 

021042 000000 000007 000004 q 
031463 000000 000017 000010 
042104 177777 000037 000020 

052525 177777 000077 000040 J 
063146 000000 000177 000100 
073567 000000 000377 000200 

104210 000000 000777 000400 J 
114631 177777 001777 001000 
125252 177777 003777 002000 

135673 177777 007777 004000 q 
146314 000000 017777 010000 
156735 000000 037777 020000 

167356 000000 077777 049000 ( 
177777 000000 177777 100000 
177777 177777 177776 100000 

167356 177777 177774 040000 < 
156735 177777 177770 020000 
146314 177777 177760 010000 

135673 000000 177740 004000 J 
125252 000000 177700 002000 
114631 000000 177600 001000 

104710 177777 177400 000400 q 
073567 177777 177000 000200 
063146 177777 176000 001000 

052525 000000 174000 000040 ( 
042104 000000 170000 000020 
031463 177777 160000 000010 

021042 177777 140000 000004 ( 
010421 000000 100000 000002 

000000 177777 000000 000001 ‘ 

d 

J 

q 

( 

q 

q 

F2  ¢ 





( 

SEG 0070 ( 

PATTERN 10 PATTERN 11 PATTERN 12 PATTERN 13 
177776 172666 153333 000000 
177775 155555 066667 177777 

177773 172666 153333 177777 ( 
177767 155555 066667 177777 
177757 172666 153333 177777 

177737 155555 066667 177777 ( 
177677 172666 153333 177777 
177577 155555 066667 177777 

177377 172666 153333 177777 ( 
176777 155555 066667 177777 
175777 172666 153333 177777 

173777 155555 066667 177777 ( 
167777 172666 153333 177777 
157777 155555 066667 177777 

137777 172666 153333 177777 ( 
077777 155555 066667 177777 
077777 172666 153333 177777 

137777 155555 066667 177777 ( 
157777 172666 153333 177777 
167777 155555 066667 177777 

173777 172666 153333 177777 ( 
175777 155555 066667 177777 
176777 172666 153333 177777 

177377 155555 066667 177777 ( 
177577 172666 153333 177777 
177677 155555 066667 177777 

177737 172666 153333 177777 ( 
177757 155555 066667 177777 
177767 172666 153333 177777 

177772 155555 066667 177777 ( 
177775 172666 153333 177777 

177776 155555 066667 177777 ( 

( 

( 

( 

( 

( 

( 

G2 ( 





PATTERN 14 


177777 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 © 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


PATTERN 15 


172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172794 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 


PATTERN 16 


070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 


PATTERN 17 


133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 


se¢ 00621 


Aa 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PB.P11 





11-AUG-76 00:00 


OPERATIONAL SWITCH SETTINGS 
BASIC DEFINITIONS 


RKOG CONTROLLER REGISTER DEFINITION 


DRIVE COMMANDS 


CONTROL AND STATUS REGISTER 1 BITS 
CONTROL AND STATUS REGISTER 2 BITS 


MACY11 30€1046) O1-DEC-77 14:15 


TABLE OF CORTENTS 


ERROR REGISTER BIT DEFINITION 


STATUS REGISTER BIT DEFINITION 
MAINTEWANCE REGISTER 1 BIT DEFINITION 


DEFINITION OF DRIVE STATUS BYTE 00 MESSAGE A 
DEFINITION OF DRIVE STATUS BYTE 00 MESSACE PB 
DEFINITION OF DRIVE STATUS BYTE 01 MESSAGE A 
DEFINITION OF DRIVE STATUS BYTE 01 MESSACE B 
COMMON MASKS 


DEFAULT DRIVE VALUES 


OFFSET VALUES 
DEFAULT CONTROLLER THRESHOLD 


PARAMETER BLOCK ALLOCATION 
PARAMETERS PASSED TO THE ORIVER 


PROGRAM DEVICE STATUS REGISTER DEFINITION 
PARAMETERS PASSED FROM ORIVER TO PROGRAM 
DRIVE SPECIFIC PARAMETERS 
TRAP CATCHER 


STARTING ADDRESS(ES) 


APT PARAMETER BLOCK 
COMMON TAGS 

APT MAILBOX-ETABLE 
ERROR POINTER TABLE 


QUEUE HEAD AND TAIL ALLOCATIONS 


SYSTEM PARAMETERS 


TEMPORARY CONTROLLER REGISTER STOPACE 


DRIVER PARAMERTERS 
TABLE OF INTERRUPT MASKS 
PARAMETER BLOCK TABLE 
WATCH-DOG TIMER COUNTS 


PERFORMANCE EXERCISER STATUS INFORMATION 


FREE SPACE BLOCK 


PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
--- RETRY 
PARAMETER 


DATA PATTERNS AND DATA PATTERN TABLE 


BLOCK FOR 
BLOCK FOR 
BLOCK FOR 
BLOCK FOR 
BLOCK FOR 
BLOCK FOR 
BLOCK FOR 
BLOCK FOR 
PARAMETER 


DRIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
BLOCK 


sIOU AWN CO 


BLOCK 10 FOR DRIVE 


PROGRAM SETUP 


INITIALIZE THE COMMON TAGS 


TYPE PROGRAM WAME 


MAIN IDLE 


Loop 


OPERATOR COMMAND DECODER 
TEST DRIVE COMMAND 
CHANGE PARAMETEPS COMMAND 
DROP DRIVE COMMAND 





SEG 0022 





RK611/RKOG6 PERFORMANCE EXERCISER MATNDEC DZR6P-8 MACY11 20(€1046) O1-DEC-77 14315 
DZR6PR.P11 11-AUG-76 00:00 TABLE GF CORTENTS 
2969 GET DRIVE STATISTICS COMMAND 
3005 WRITE PACK AND TEST COMMAND 
3043 DROP DRIVE AND GATHER STATISTICS ROUTINES 
3102 INITIATE DRIVE ASSIGNMENT SEQUENCE 
3130 DRIVE ASSIGNMENT SEQUENCE 
3315 WRITE WHOLE PACK WITH RANDOM DATA 
3475 ALTER DPIVE PARAMETERS 
3899 TEST DEFAULT PARAMETERS ROUTINE 
3934 LOAD DISK EXCLUDED AREAS 
4078 GEWERATE WEW RANDOM COMMARD 
4298 GET AVAILIBLE BUFFER ROUTINE 
4319 BUFFER ALLOCATION ROUTINE 
4397 BUFFER RELEASE ROUTINE 
4490 LOAD DATA BUFFER 
4586 FIND FIRST DATA ERROR 
4604 COMPARE DATA BUFFER 
4790 NORMAL COMMAND RETURN 
4985 CHECK BUS ADDRESS, WORD COUNT, SECTOR, TRACK, ANDO CYLINDER 
5049 ABNORMAL TERMINATION 
5098 COMMAND TIME OUT ROUTINE 
5130 PRINT RKOG UNIBUS REGISTERS 
5145 PRINT ORIVE STATUS 
5180 PRINT CONTROLLER STATUS 
5194 PRINT REGISTER CONTENTS 
$205 ECC CORRECTION ROUTINE 
5258 CONTROLLER ERROR DETECTED BY RKOG DRIVER 
$358 CONTROLLER ERROP DUE TO REIGSTER ITNCONSISTANCIES 
5407 PRINT WHOLE DATA BUFFER 
5447 PRINT DRIVE AWD PACK SERIAL NUMBERS 
5498 PRINT BEGINWING OF ERPOR HEADER 
$511 PRINT PREVIOUS COMMAND 
5543 PRIWT CURREWT GENERATED COMMAND 
5586 PRINT ERROR MESSAGE AND DROP DRIVE 
5634 PRINT ERROR MESSAGE 
5729 HALT OW ERROR CHECK 
5740 OTHER ERROR STATISTICS CATHERTNG 
$750 SEEK INCOMPLETE STATISTICS GATHERTNC 
$757 OPERATION INCOMPLETE STATISTICS GATHERING 
5788 UNSUCESSFUL RECOVERY CLEANUP 
5846 ERROR RECOVERY SEQUENCE 
6408 CALCULATE CYLINDER, TRACK, AND SECTOR FOk RETRY 
6453 PRINT FIRST ERROR WORD IN BUFFER 
6516 SUCCESSFUL RECOVERY CLEAN UP 
6611 GET CURRENT STATUS INFORMATION 
6625 RESTORE STATUS 
6638 DETERMINE OFFSET FOR RETRY 
6676 CALCULATE RETRY WORD COUNT 
6704 RECOVERABLE CONTROLLER ERROR TERMINATION 
6740 TEST FOR DROP DRIVE ERRORS 
6880 ERROR RECOVERY SEQUENCE NORMAL RETUPN 
7163 CALCULATE WORDS TRANSFERRED UNTIL BAD SECTOR 
7207 BAD SECTOR HANDLING 
7304 ERROR RECOVERY SEQUENCE ABNORMAL RETURN 
1365 DETERMIWE IP CLOCK IS PRESENT 
7383 SET UP CLOCK INTERRUPT 
7400 KWil-L AND K#11-P INTERRUPT HANDLER 


stoe 0623 


2 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-f 
11-AUG-76 00:00 TABLE OF CONTENTS 


DZR6PB.P11 


7421 
7452 
7471 
7478 
7155? 
71743 
7802 
7914 
1954 
1974 
6017 
8052 
8123 
6155 
8200 
8265 
6410 
8541 
8575 
8609 
8648 
8701 
8812 
8R19 
68699 
8942 
9046 
9065 
9141 
9197 
9258 
9290 
9320 
9374 
9411 
9506 
9563 
9586 
9599 
10286 





PRIWT TIME ROUTINE 
CONVERT DECIMAL LESS THAW 100 
RE611/RKOG6 UNIBUS DRIVER FOR QUEVED OPERATIONS (REV. 0.08) 
*WATCH-DOC TIMER 
*RKOG6 INTERRUPT SERVICE ROUTINE 
*READ ALL HEADERS INTERRUPT SEQUENCE 
*DRIVE ATTENTION SCANNER 
*ATTENTION ERROR HANDLER 
*ERROR CAUSING DRIVE TO UNLOAD 
*DUAL ACCESS INTERRUPT HAWDLER 
*CONTROLLER CLEAR ROUTINE 
*COMPAND ISSUED BY DRIVER SERVICE ROUTINE 
*STORE RK611 UNIBUS REGISTERS 
*STORE CONTROLLER STATUS 
*GATHER DRIVE STATUS 
*COMMAND INITATOR 
*SPECIAL COMMAND PROCESSING 
*ENQUEVE ROUTINE 
*POP QUEVE ROUTINE 
*SEARCH QUEUE FOR DRIVE WOT POSITIONING 
*REMOVE PARAMETER BLOCK FROM COMMAND INITIATIOW QUEUE 
*COMMAND OPTIMIZER 
MEMORY CHECK ENABLE TEST 
TYPE ROUTINE 
BINARY TO OCTAL (ASCII) CONVERSION 
TTY INPUT ROUTINE 
TK INITIALIZE ROUTINE 
TK SERVICE ROUTINE (ORLY CONTROL C IS REGHIZED) 
OCTAL TO SIRARY CONVERSTON ROUTINE 
DECIMAL TO BIBAPY CONVERSION ROUTINE 
ROUTINE TO SIZE MEMORY 
POWER DOWN AND UP ROUTINES 
INTEGER MULTIPLY ROUTINE 
RANDOM NUMBER GENERATOR ROUTINE 
SINGLE/DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINES 
APT COMMUNICATIONS ROUTINE 
TRAP DECODER 
TRAP TABLE 
ASCII MESSAGES 
eee DUMP MEMORY *** 


MACY11 30€1046) 01-DFC-77 14315 


Ka 
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RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30(1046) O1-DEC-77 14:15 PAGE 3 
| DZR6PR.P11 11-AUG-76 00:00 SEG 0075 € 
1 eTITLE REGLI/RKOG PERFORMANCE EXERCISER WATRDEC CZRG6P-P 
*COPYRIGHT (C) 1976 © 
3 P*DIGITAL EQUIPMENT CORP. 
4 P*MAYNARD, MASS. 01754 
7 5 3* @ 
6 3*PROGRAN BY ROY SPITZER 
7 3* 
- 8 3*THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAIRDEC SY¥swaC (a 
9 S*PACKACE (MAINDEC-11-DZQAC-C1),MAR 24, 1976. 
10 3 
11 @ 
12 FPSAAAAARASNAAARARAAARSAARARAARARAARAAAAGRORAAAAARARARAHARARALAAAAROS 
13 3* 
ig 3* THE RKOG PERFORMANCE EXERCISER WILL EXERCISE 1 TO 8 e€ 
15 3* REO6 DISK DRIVES ATTACHED TO THE SAWE RROG 
as 3* UNIBUS CONTROLLER IW A DEDICATED STABD ALCHE MODE. e 
3* 
18 af UNDER NORMAL OPERATION SITUATIONS, THE OFIVE IS 
19 3* CHOSEN RANDOMLY FROM ABY ONE OF TRE RKOG DRIVES UNDER TEST 
7 20 3* WHICH IS ROT CURRENTLY UNDERGOING ERROR RECOVERY. © 
21 3* TO OPTIMIZE THE THROUGHOUT OB TRE REOG CORTPOLLER EACH 
22 3* DATA TRANSFER COMMAND IS TRANSLATED INTO # SEEK FOLLOWED 
J 23 3* BY THE DATA TRAWSFER COPMAND. © 
4 7 
25 JP AAAARAAAARAASHAAAARARARAAAARHARAAAHAARAAASRAARAEARARAARAAAAAAS AHRARAS 
26 eS8TTL OPERATIONAL SWITCH SETTINGS @ 
7 3* 
28 3* SWITCH USE 
30 3* is HALT OM ERROR 
31 3* 14 LOCP CR TEST 
32 3* 13 INHIBIT ERROR TYPEOUTS € 
33 3* 10 BELL OW ERROR 
34 3* 6 INBIBIT AUTOMATIC DRIVE DEASSIGHNENT If UNSAFE, 
35 3° AC LOW, OR SPEED LOSS OCCURS € 
36 3* 5 INHIBIT AUTOMATIC DRIVE DEASSIGRNENT WHER 
37 3* MAXTMOM COMMAND COUNT FOR DRIVE IS EXCEEDED 
38 3* & INBIBIT AUTOMATIC DRIVE DEASSIGRNENT WHER € 
39 3* EPROR THRESHOLD EXECEEDED 
40 3* a DUMP ENTIRE SECTOR BEFORE BEGINBING RETRY SEQUERCE 
41 3* 1 INHTBIT SOPTRAGE DATA CCHPAPISONS e@ 
€ 
€ 
€ 
¶ 
La © 








<é 
RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30(1046) 01-DEC-77 14215 PACE 4 
“7 ozr6Ps.Pii 11-AUG-76 00:00 BASIC DEFINITIONS SEQ 0026 4 
. 
4? eS8TTL BASIC DEFINITIONS P 
: 43 
44 S*INITIAL ADDRESS OF THF STACK POTNTER *** 1100 #02 
45 001100 STACK= 1100 
J 46 eEQUIV ENT, ERROR 3BASIC DEFIRITIGR OF ERROR CALL é 
47 eEQUIY 10T,SCOPE 33BASIC DEFIBITION CF SCOPE CALL 
48 
J 49 d*MISCELLANEOUS DEFINITIONS 4 
50 000011 aT= 11 339CODE FOR HORIZONTAL TAB 
51 000012 Les 12 33CODE FOR LINE FEED 
: §2 000015 cR= “45 33CODE FOR CARRIAGE RETURN 4 
52 000200 CRLF= 200 29CODE FOR CARRIAGE RETURN-LINE FEED 
54 177776 PS= 177776 #3PROCESSOR STATUS WORD 
55 eEQUIY PS,PsW é 
56 177774 STKLWT= 177774 d9STACK LINT? REGISTER 
57 177772 PIRQ= 177772 Z3PROGRAM INTEGRUPT REQUEST RECTSTER 
- 58 177570 DSWR= 177570 3HARDWARE SWITCH REGISTER é 
59 177570 DDISP= 177570 3HARDWARE DISPLAY RECISTER 
69 
- 61 S*GENERAL PURPOSE REGISTER DEFINITIONS é 
62 000000 RO= 20 33CENERAL REGISTER 
63 000001 Ris 81 PCEMERAL REGISTER 
: 64 000002 R2= $2 3CEWERAL REGISTER € 
65 000003 R3= a3 23GENERAL REGISTER 
66 000004 R4= a4 PCENERAL REGISTER 
- 67 000005 RS= ae Z3CENERAL REGISTER é 
68 000006 R6= 86 29GEWERAL REGISTER 
69 000007 R7T= 87 39CENERAL REGISTER 
7 70 000006 sp⸗ as P9STACK POINTER é 
71 000007 Pc= 87 33PROGRAN COUNTER 
72 
: 73 3*PRIORITY LEVEL DEFINITIONS € 
74 000000 PRO= 0 Z3PRIORITY LEVEL 0 
75 000040 PRi= 40 Z3PRICRITY LEVEL 1 
+ 16 000100 PR2= 100 33PRIORITY LEVEL 2 € 
71 000140 PR3= 140 23PRIORITY LEVEL 2 
78 000200 PR4= 200 Z3PRICRITY LEVEL 4 
J 79 000240 PRS= 240 PRIORITY LEVEL 5 € 
80 000300 PR6= 300 SPRIORITY LEVEL 6 
81 000340 PR7= 340 9PRICRITY LEVEL 7 « 
2 
33 2*@SWITCH REGISTER" SWITCH DEFINITIONS 
84 100000 Sw15= 100000 
7 85 040000 Swi4= 40000 i 
86 020000 Swi13= 20000 
87 010000 SW12= 10000 
‘ Pt) 004000 SW11= 4000 € 
89 602000 SW10= 2000 
90 001000 swo9= 1000 
91 000400 swok= 400 é 
92 000200 SwO7= 200 
93 000100 sw06= 100 
- 94 000040 svoS= 40 c 
95 900020 sw04= 20 
96 0uv010 swo3= 10 
97 000004 swo2z= 4 Ma q 
9 
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9A 
99 
100 
* 101 
102 
10? 
104 
105 
106 
107 
10” 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
12? 
123 
124 
125 
126 
127 
128 
12° 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 
14? 
143 
144 
145 
146 
147 
149 
149 
150 
151 
152 
153 


11-AUG-76 00:00 


000002 
000001 


100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 


000004 
000010 
000014 
000014 
000014 
000020 
000024 
000030 
000034 
000060 
000064 
000240 
000240 
120210 


BASIC D 


Sw0l= 

swoo= 

EQUIV 
EQUIV 
EQUIV 
EQUIV 
eEQUIV 
EQUIV 
EQUIV 
EQUIV 
EQUIV 
EQUIV 


3*DATA 
BIT15= 
BIT14= 
BIT13= 
BIT1IZ= 
BIT11= 
BIT1O= 
BITO9= 
BYTOS= 
BITO7= 
BITO6= 
BITOS= 
BIT04= 
BITO3= 
BITO2= 
BITO1= 
BITOO= 
eEQUIV 
eFQUIV 
eEQUIV 
EQUIV 
eEQUIV 
eEQUIV 
eEQUIV 
eEQUIV 
EQUIV 
EQUIV 


EFTNITICWS 


2 

1 

Sv09,Su9 
Ssw08,Sw8 
SW07,SW7 
$w06,SW6 
svos, SWS 
swo4,Sw4 
SW03,SW3 
Sw02,Su? 
SW01,SW1 
Sw00,Sw0 
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PIT DEFINITIONS (BITOO TC PIT15) 


100000 
40000 
20000 
10000 
4000 


BITO9,8IT9 
BITOG,BITS 
BITO7,BIT7 
BIT06,BIT6 
BITOS,B8ITS 
BIT04,BIT4 
BIT03,81T3 
BITO2,B1T2 
BITO1,BIT1 
BITOO,BITO 


s*BASTC "CPU" TRAP VECTCk ADDRESSFS 


ERRVEC= 


4 


RESVEC= 10 
THITVEC=14 
TRIVEC= 14 
BPTVEC= 14 


PWRVEC= 24 
EMTVEC= 30 
TRAPVEC=34 
TKVEC= 60 
TPVEC= 04 
PIRQVEC=240 
APRIOR= PRS 


AVECT1I= 120210 


33TIME OUT AWD CTHEP ERPCRS 
22RESERVED ABD TLLECAL TNSTRUCTIONS 
a3"T" BIT 
33 TRACE TRAP 
JsBREAKPOINT TRAP (BET) 
SsINPUT/ONTPUT TRAP (TCT) **SCOPE** 
dsPOWER FAIL 
s7EMULATOP TRAP (EMT) **EFROR** 
33"TRAP® TRAP 
33TTY KEVPGARD VECTOR 
s3TTY PRINTER VFCTCR 
Z3PROGRAM INTERPUPT KEQUEST VECTOR 
dRK611 PRICTRITY 
3PK611 VECTCK 


se¢ 6627 


2 











e | 





REG11/RER06 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACYL1 30(1046) O1-DEC-77 14:15 PAGE 6 
DZR6PBR.P11 11-AUG-76 00:00 BASIC DEFINITIONS SEC 0078 
154 177440 ABASE= 177440 3PK611 BASE 
155 000114 MEMVEC= 114 sVECTOR FOR MEMORY CHECK ENABLE 
156 172100 MEMBAS= 172100 98US ADDRESS FOR WEWORY CHECK EWAPLE 
157 000001 PAREN: 1 3MEMCRY ENABLE PEPORY CRECKING 
158 
159 eSBTTL RKO6 CONTROLLER REGISTER DEFINITION 
160 
161 000000 RECSI= 0 CONTROL AND STATUS REGISTER 1 
162 000002 RRwC= 2 WORD COUNT REGISTER 
163 000004 RKBA= 4 3BUS ADDRESS REGISTER 
164 000006 REDA= 6 PDESIRED TRACK SECTOR REGISTER 
165 000010 RKCS2= 10 CONTROL ANDO STATUS REGISTER 2 
166 000012 REDS= 12 JORIVE STATUS REGISTER 
- 167 000014 RRER= 14 PERROR REGISTER 
168 000016 RKASOF= 16 PATTENTION SUMMARY AND OFFSET REGISTEF 
169 000020 REDC= 20 DESIRED CYLINDER REGISTER 
J 170 000020 RFDCYL= 20 DESIRED CYLINDER REGISTER 
171 000024 REDB= 24 3DATA BUFFER 
172 000026 REMRIi= 26 #MATRTERAWCE REGISTER 1 
7 173 000034 REMR2= 34 MAINTENANCE RECISTER 2 
174 000036 REMR3= 36 #MAINTEWANCE REGISTER 3 
175 000030 RKPOS= 30 3ECC POSITION INFCRPATICH 
J 176 000030 RKECPS= 30 3ECC POSITION INFCRWATICH 
177 000032 RKPAT= 32 3ECC PATTERN INFORMATION 
: 178 00003? RKECPT= 3? ZECC PATTERN IBFORMATIOR 
179 
180 eSBTTL DRIVE COMMANDS 
181 
J 18? 000101 SELDRV= 101 sSELECT DRIVE 
183 000103 PACK= 103 PACK ACKNGWLECGE 
184 000105 CLEAR= 105 DRIVE CLEAR 
‘ 185 000107 UNLOAD= 107 ,UNLOAD 
186 000111 SPTSPL= 111 #START SPINDLE 
187 000113 RECAL= 113 ;RECALIPRATE 
168 000115 OFFSET= 115 ,OFFSET 
189 000117 SEEK= 117 7SEEK 
190 000121 RDDATA= 171 JREAD DATA 
- 191 000123 WRDATA= 123 sWRITE DATA 
192 000125 RDHEAD= 125 READ HEADER 
193 000127 WRHEAD= 127 WRITE HEADER AND DATA 
7 use 000131 WRTCHR= 131 dWRITE CHECK 
195 
196 3 THE FOLLOWING APE NOT DRIVE COMMANDS BUT ARE USED BY THE CRIVER 
: 197 ; T0 SIMULATE A SPECIFIC DESIRED OPERATION 
198 
199 000140 RELEAS= 140 pRELEASE DRIVE 
- 200 000141 RDSTAT= 141 3CET ALL STATUS FROY DRIVE 
201 000164 RDALHD= 164 #READ ALL HEADERS 
202 000176 CONCLR= 176 CONTROLLER CLEAR (BIT 15 CF CS1) 
J 203 000177 SUBCL®= 177 , #SUBSYSTEW CLEAR (BIT 5 OF CS2) 
204 000300 INTR= 300 sGEWERATE INTERRUPT TO CPU 
205 
: 206 3 DRIVER ISSUFD SFRVICE COMPARCS 
208 000001 DR.SEL= 001 ;DRIVE SELECT 


- 209 000005 DP.CLP= 005 JDRIVE CLEAP B3 








RR611/RK06 PERFORMANCE EXERCISER MATNDEC DZR6P-B MACY11 30€1046) O1-DEC-77 14315 PACE 7 


7 OZR6PR.P11 11-AUG-76 00:00 DRIVE COMMANDS SEQ 0075 ( 
210 
7 211 eS8TTL CONTROL AWD STATUS REGISTER 1 BITS ( 
212 
213 000001 co⸗ oarro 260 BIT 
J 214 000100 Ie= BIT6 ZTUTERROPT ERABLE ( 
215 000200 RDY= BIT? SCONTROLLER READY 
216 000400 BALI6= 87178 zbus ADDRESS RIT 16 
7 217 001000 BAL7= 2179 g8US ADDRESS PIT 17 { 
218 002000 cor⸗ BIT10 SCONTPOLLER DRIVE TYPE (O0=RKU6) 
219 004000 cTO= BITil SCONTROLLER TIMEL OUT WAITING FOR 
7 220 3 ORIVE RESPORSE ( 
221 010000 CPMT= 81712 SCONTROLLER DRIVE FORMAT (0222 SECTCR, 12206 SFCICK) 
222 020000 SPAR= ®BIT13 JDRIVE BUS PARITY ERROR DETECTED PY CCNTACLLEF 
- 223 040000 DI= BIT14 sDRIVE THTERRUPT ( 
224 100000 CERR= BIT15 ZCORTROLLER EGECK 
r 225 100000 CCLR= BIT15 sCOWTROLLER CLEAR 
226 
227 ; TRESE BIT DEFINITIONS ARE USED FOR ADDRESS 
228 3 THE HIGH RYTE OF RKCS1 
7 229 ( 
230 000001 B.BAL6= BITO 3PUS ADDRESS PIT 16 
231 000002 B.BA17= BIT1 3BUS ADDRESS BIT 17 
J 232 000004 B.CDOT= BIT2 ZCOWTROLLER CRIVE TYPE (O=RE06) ( 
333 000020 B.CFMT= BIT4 . SCONTROLLER DRIVE FOKMAT (0=22 SECTOR, 1270 SFCTCR) 
34 
J 235 -SBTTL CONTROL AND STATUS REGISTER 2 BITS | 
236 
237 000007 DRYMSK= 7 MASK FOR DRIVE SELECTION CODE 
¢ 238 000010 DESL= BIT3 PDESELECT OR RELEASE DRIVE IN BITS 0-2 | 
239 000010 RLS= BIT3 PDESELECT OR RELEASE DRIVE IM BITS 0-2 
240 000020 BAI= BIT4 3B8US ADDRESS INCREMENT INHIBIT 
: 241 000040 CLR= BITs JCLEAR CONTROLLER AND ALL ORIVES | 
242 000040 SCLR= BITS sCLEAR CORTRCLLEG ABD ALL ORIVES 
243 000100 IRs BIT6 ;IMPUT READY 
, 244 000200 OR= BIT? ZOUTPUT READY 
24° 000400 UFE= BITe 3UNIT FIELD ERGCE 
246 001000 MDS= BIT9 SMULTIPLE DRIVE SELECT 
. 247 002000 PGE= BIT10 sPROGRAMMING ERROR ( 
248 004000 NEM= BIT11 SNOW-EXTISTENT MEMORY 
249 ¢ 010000 NED= BIT12 ZWON-FXISTENT DRIVE 
250 020000 UPE= BIT13 sUNTBUS PARITY ERROP | 
251 040000 WCE= a1114 zunrrr CHECK ERRCR 
ase 100000 DLT= BIT15 DATA LATE FRECR 
( 
254 eSBTTL ERROR REGISTER RIT DEFINITION 
255 
256 000001 ILc= BITO ZILLEGAL FUNCTICA CCOE 
257 s*ILF= BITO ZILLEGAL FUNCTION CCDE 
258 000002 S«I= BIT1 #SEEK INCOMPLETE 
259 000004 ILF= BIT? ZYLLECAL DRIVE FURCTION 
260 000004 NXF= BIT2 ZILLEGAL DRIVE FUNCTION 
261 000010 ORPAR= BIT3 ZDRIVE TETECTED DRIVE BUS PARITY ERROR 
262 000020 FMTE= BIT4 SPORMAT ERRCR ( 
263 000040 OTYE= BITS ZDRIVE TYPE ERRCE 
264 000100 ECH= BIT6 3ECC HARD 
265 000200 BSE= BIT? #RAD SECTOR ERROR <3 ( 
J ( 





RK611/RKO6 PERFORMANCE EXERCISER PAINDEC DZR6P-f MACY11 30€1046) 01-CEC-77 14:15 PACE 8 

D7R6PB.P11 11-AUG-76 00:00 ERROR REGISTER BIT DEFINITION fEC 0020 . 
766 000400 HcRC= BIT® SHEADER CRC ERRROR 
267 000400 HvRC= BrTe ZHEADER URC ERRRCE ( 
268 001000 COE= BIT9 SCYLINDER ADDRESS OCVERFLOW ERROR 
269 002000 IDAE= B1IT10 STMVALID DISK ADDRESS ERROR 
270 004000 WLe= BITil SWRITE LOCK ERSCE ( 
271 010000 DTE= BIT12 JORTVE TIMING ERRCR 
27? 020000 OPI= BrT13 JOPERATION (SEARCH) INCOMPLETE 
973 040000 UNS= a1714 pORTVE ONSAPE ( 
274 100000 ocx⸗ BIT15 sDATA CRECK 
275 
276 eSBTTL STATUS REGISTER BIT DEFINITION ( 
277 
278 000001 DRA= BITO PORTIVE AVAILABLE (CONTROLLER IS SET 1° 
279 3 THIS BIT IS RESET) ( 
260 000004 OFST= BIT? JDORIVE OFFSET 
261 000010 ACLO= BIT3 zac LOw 
282 000020 SPDLSS= BIT4 3SPEED LOSS ( 
283 000020 DCLO= BIT4 30C Low 
784 000040 OROT= BITS SORIVE OFF TRACE 
2865 000100 v= BIT6 sVCLOME VALIC ( 
286 000200 DRY= BIT? JDRIVE READY 
287 000200 DROY= BIT? JDRIVE READY 
288 000400 DDT= Brre sORTVE TYPE (O=RKC6) ( 
289 004000 wRL= BIT11 }WRITE LOCK 
290 020000 PIp= BIT13 SPOSITIONING IN PROCKESS 
291 040000 osc⸗ a1714 2D0RuE STATUS CHARGE ( 
292 100000 SVAL= BIT15 sSTATUS WALIC 
293 
794 eSBTTL MAINTENANCE REGISTER 1 BIT DEFINITION ( 
295 
296 000017 MES“SF= 17 sMESSAGCE MASK | 
297 
29a 000020 PaT= BIT4 zronct EVEN PARITY ON DRIVE BUS MESSACE LIBES 
299 000040 D¥D= BITS SDIAGROSTIC MODE 
300 000100 MSP= BIT6 SPAIBTERARCE SECTCK PULSE ( 
301 000200 MIND= ®BIT7 SMAINTERARCE INDEF 
302 000400 MCLK= BIT SMAINTERARCE CLOCK 
303 001000 MERD= BIT9 SMATNTENANCE ENCCCEC READ Cata ( 
304 002000 MEWD= BIT10 PMAINTENACNE EMCODED WRITE CATA 
305 004000 PCA= BIT11 PPRECONPENSATION ADVANCE 
306 010000 PCD= BYT12 PPRECCHPENSATICH CELAY ( 
307 020000 eccw= 861713 3ECC WORD IS BEING READ OR WRITTER 
308 040000 WRIGAT= BIT14 PVRITE CATE 
oe 100000 RDGATE= BIT15 PEAD GATE ( 

10 

aa eSBTTL DEFINITION OF DRIVE STATUS BYTE 00 MESSAGE A 5; 
1 
317 000040 S-DRA= BITS PORTVE AVAILIABLE 
314 000100 S.V¥= BIT6 sVCLUME WALIC 
315 000200 S-DRY= BIT7 #DRIVE PEADY ( 
316 000400 S.TYPE= BITS sDRIVE TYPE 
317 001000 S.FORY= BITS pDRTVE FORMAT 
318 002000 S.OFF= BIT10 ;CEFSET ( 
319 004000 SeWRL= BITI1 sWRITE LOCK 
320 010000 S.SPIN= BIT12 sSPIMDLE On 


321 020000 SePIP= aIT13 sPOSITIONTAC Th PROGRESS D3 








a a — 


RE611/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-8 MACY11 30€1046) O01-DEC-77 14315 PAGE 9 
DZR6PR.P11 11-AUG-76 00:00 DEFINITION OF DRIVE STATUS BYTE 00 MESSAGE A SEC 0071 ( 
32? 040000 $.0SC= BIT14 PORTVE STATUS CHARGE 
323 
324 eSBTTL DEFINITION OF DRIVE STATUS BYTE 00 MESSAGE B 
325 
326 000040 S.ICYL= BITS PTLLEGAL CYLIBOES ADDRESS ( 
327 000100 S-ACLO= BIT6 3aC LOW 
328 000200 S-FLT= BIT7 sORIVE FAULT 
329 000400 S.ILf= BIrTe dTLLEGAL FURCTION ( 
330 001000 S.PAR= - BIT9 ZORTIVE DETECTED ORIVE BUS PARITY ERROR 
331 002000 S-SKI= BIT10 3SEEK INCOMPLETE 
332 004000 S-WLE= BITI1 SWRITE LOCK ERROR ( 
333 010000 $.SPLS= BIT12 #SPEED Loss 
334 010000 $.OCLO= BIT12 30C LOW 
335 020000 S.DROT= BIT13 sDRIVE OFF TRACK ( 
—3 040000 S.UNS= BIT14 JORTVE ONSAPE 
3 
338 eS8TTL DEFINITION OF DPIVE STATUS BYTE 01 MESSAGE A ( 
339 
340 000020 S-XDOK= BIT4 PTRANSDUCER OK 
341 000040 S.HDEM= BITS sHEACS ROME ( 
342 000100 S-BRHM= BITE PBRUSHES ROWE 
343 000200 $.DOOR= BIT? sDOOR IWTERLOCKED 
344 000400 S-CART= BITE SCARTRAGE IWTERLOCK ( 
345 001000 S.SPOK= BIT9 3SPEED OK 
346 002000 S.FWD= BIT10 PPORWARD 
347 004000 S.REV= BITI1 pREVERSE ( 
348 010000 S.LOAD= BIT12 HEADS LOADTAG 
349 020000 S.RTZ= 81713 sRETURH TO VERC 
350 040000 S.UNLD= BIT14 3REAOS ONLOADING ( 
351 
25? eSBTTL DEFINITION OF DPIVE STATUS BYTE 01 PESSACE 8 
353 
354 000020 S.SECT= BIT4 sSECTOR EPROR 
355 000040 S.WCLK= BITS SWRITE CLOCK AND WO WRITE GATE 
356 000100 ’ S.WGAT= BIT6 SWRITE GATE AWD BC TRANSISTIONS ( 
357 000200 S.HDFL= BIT? sHEAC FAULT 
358 000400 S.MHD= BIT6 SMULTIPLE HEAD SELECT 
359 001000 SXERR= BIT9 3TNDEX ERROR ( 
260 002000 S.OIB= BIT10 sDIBIT ERRGR 
361 004000 S.PLO= BIT11 PLO ERRCR 
362 010000 S.NMOV= BIT12 3SEEK AND WO WOTICH ( 
363 020000 S.LIMD= BIT13 sLIMIT DETECT ON SEEK 
see 040000 SeBRKE= BIT14 PSERVO-RRAKE , 
5 
oe -S8TTL COMMON MASKS 
67 
368 000007 M.DRV= 7 DRIVE CCDE ( 
369 100000 MePAR= BIT15 sPAPITY 
370 000003 M.ID= 3 BYTE ID 
371 017760 M.CDIF= 17760 SCYLINDER DIFFERENCE/OFFSET ( 
372 017760 M.CADD= 17760 3CYLINDER ADCRESS 
373 077770 M.SER= 77770 sCURIVE SERIAL BOPPER 
374 000760 M.SECT= 760 sSECTOR COURT ( 
ome 007000 MeHEAD= 7000 HEAD DECODFE 
6 
377 eSBTTL DEFAULT DRIVE VALUES ( 


ES 





I 
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@ o7k6P®.P11 11-AUG-76 00:00 DEFAULT ORIVE VALUES SEC 0033 ( 
378 
379 000000 D.MNCL= 0 s¥IVINUM CYLIBDER ( 
380 000632 D.MXCL= 410. SMAVIMNUM CYLINOES 
361 000000 D.MNTR= 0 PMIWIMNUN TRACK 
382 000002 D.MXTR= 2 MAXIMUM TRACK ( 
363 000000 D.MNSC= 0 pwININOM SECTCR 
364 000025 D.MXSC= 21. s¥AXIPOUM SECTCR 
385 000003 D.RATE= 3 PREAD/URITE RATIO (5/3) ( 
386 000000 D.AWCK= 0 uo AUTOMATIC WRITE-CHECK APTER EVERY WRITE 
387 000012 D.CERT= 10. pCORGECTABLE BEAD ERROR TAKESHOLE 
J 368 000005 D.UERT= 5 JUNCORRECTABLE READ ERROR TRRESACLO ( 
389 000005 D.SKET= 5 SSEEK ERROR TARESHOLD 
290 077777 D.CTRH= 77777 COMMAND COORT THRESHOLD 
391 177770 D.CTRL= 177770 3 (CHARTNON CP CCPMANDS ISSUED TC DRIVE) ( 
392 077777 D.WTHI= 77777 SWORDS TRANSFERRED THRESHOLD 
393 177770 D.WTLO= 177770 9 CRAZTNON BOMBER OF WORDS READ CR WRITTIED 
- 394 3 OB PACE) ( 
395 000020 T.HER= 20 THRESHOLD OF OTHER DRIVE ERRORS 
396 
. 397 eSBTTL OFFSET VALUES ( 
398 
399 000060 OFFP12= 060 JOFFSET ©1200 MICRO-INCHES 
400 000040 OFFPG= 040 JOFPSET 800 WICRO-INCHES ( 
401 000020 OFFP4= 020 pOPPSET 0400 PICKEC-INCHES 
402 000220 OFrrMN4= 220 ZOPFSET -400 MICRO-INCHES 
403 000240 OFFMG= 240 ZOPFSET -800 MICRO-INCHES. ( 
404 000260 OFFM12= 260 JOFPSET -1200 MICHC-INCHES 
405 
7 406 eSBTTL DOEFAULT CONTROLLER THRESHOLD ( 
407 
408 001000 T.DLT= 1000 3THRESHCLD POR CATA LATE 
409 000012 T.CONT= 10. JTHPESHOLD POR CTHER CONTROLLER EFACRS ( 
( 
4 ( 
( 
. . ( 
’ ( 
( 
: ( 
J FS ( 
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DZR6PB.P11 11-AUG-76 00:00 PARAMETER BLOCK ALLOCATION s&@ 0023 | 
410 eSBTTL PARAMETER BLOCK ALLOCATION 
at 3* Aeenaneenenereneenanasasananaeneanaenenenesanaees 
413 #* 1 § COMMAND  ORIVE HO. ' 0 
414 3* 3 ££ CYLINDER ADDRESS ' 2 
415 a* 65 1 TRACK ! sector ' 4 
416 gy 67 1BA16-17,FORMAT,ORY TYPE OFFSET ' 6 
417 s* 11 § BUS ADDRESS (LOW 16 BITS) ft 10 
418 3* 13° 9 WORD COUNT (2°S COMPLEMENT) #12 
419 3* 15 f PROGRAM DRIVE STATUS INFORMATION 14 
420 3* 17 1 COMMAND AWD STATUS REGISTER 1 146 
421 3* 21 1 COMMAND AWD STATUS RECISTEG 2 t 20 
422 3* 23. &§ WORD COUNT RECISTER § 22 
423 3* 25 § BUS ADDRESS REGISTER i 24 
424 3* 27 1 DESTRED TRACK AWD SECTOR § 26 
425 3* 31 { DESTRED CYLIBSDER 30 
426 3* 33 € ATTENTION SUMMARY AND DRIVE OFFSET t 32 
427 3* 35 f ERROR REGISTER a 34 
428 3* 37 { STATUS RECISTER t 36 
429 3* 41 1 MESSAGE LIBE A STATUS BYTE 00 § 40 
430 3* 43 f MESSAGE LINE B® STATUS BYTE 00 1 42 
431 3* 45 § MESSAGE LIWE A STATUS BYTF 01 ' 44 
432 3* 47 { MESSACE LINE B STATUS BYTE 01 1 46 
433 3* 51 f MESSAGE LIBE A STATUS BYTE 10 i 50 
434 3* 53 8 MESSAGE LINE B STATUS BYTE 10 ' 52 
435 3* SS 1 MESSAGE LINE A STATUS BYTE 11 ' 54 
436 p* 97 § MESSAGE LIWE 8 STATUS BYTE 11 ' 56 
437 3* 61 { ECC POSITION THFORMATION t 60 
438 3* 63 f ECC PATTERN INFORMATICH ! 62 
439 3* Qeereneenennenarennanananenrasasaenenenenenanenen 
440 
—3 eSSTTL PARAMETERS PASSED TO THE ORTVER 
443 3 TRE FOLLOWING DEFINITIONS ARE USED TC PASS PARAPETEPS 
a 2 TO THE RKOG DRIVER 
ag 
446 000000 P.DRYR= 0 sODRTIVE WONBER 
447 000001 P.CMND= 1 3COMm AND 
448 000002 P.CYLW= 2 SCYLINDER ADDRESS 
449 000004 P.SECT= 4 sSECTCR 
450 000005 P.TRCK= § sTRACK 
451 000006 P.OFST= 6 sOFFSET 
452 000007 P.CS1W= 7 SRKCS1 BITS 6-15 
453 000007 P.BAHT= 7 bus ADDRESS (BITS 16 ABD 17) 
454 000010 P.BALC= 10 3BUS ADDRESS (BITS 0-15) 
455 000012 P.WC= 12 sVORD COUNT (2°S COPMPLEPERT) 
—9— 000014 P.PRST= 14 SPROGPAM DRIVE STATOS IMFORMATICS 
— eSBTTL PROGRAM DEVICE STATUS REGISTER DEFINITICH 
59 
460 000001 DRVUSE= BITO SDRIVE Th USE 
461 000002 DRVPOS= BIT1 sDRTIVE POSITICAIAG 
462 000004 D°VPDT= BIT2 SDRIVE POSITICHED FOR DATA TRANSFER 
463 000010 UEXATT= BIT? SUMEXPECTED ATTENTION 
464 000020 ORVHRD= BIT4 SORTVE HAS HARD ERERCR 


465 000040 DRVDSC= BITS SORIVE STATUS CHANGE DID NOT CLES 





lee» © @ @ @ @ @ @ @ @ @ @ 
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DVR6PB.P11 11-AUG-76 00:00 PROGRAM DEVICE STATUS REGISTER DEFINITICH SEG 0034 ( 
466 000100 CMoTG= BIT6 380 TERMINATION TO COMMAND FOR AT 
467 » LEAST 1 SECORD ( 
468 000200 W.UCK= BIT? SWRITE PCR WRITE WRITE CHECK 
469 000400 WOCHK= BITS 3¥O CHECK, DO NOT SET IBSTERRUPT ENABLE 
470 001000 PBSVAL= BITS SPARAMETER STATUS WORDS VALID ( 
471 3 (CSET URER EERGR TERMIBATION Cb 
472 3 READ STATUS COPNAND) 
473 002000 DRPDRV= BIT10 sDROP DRIVE FROW TEST SEQUENCE ( 
474 004000 woDSC= BIT11 SATTERTION SET BUT DCS AND PAULT RESET 
475 010000 DRVSZD= BIT12 SDRIVE SEIZED BY CTRER PORT 
476 020000 E.UNLD= BIT13 SDRIVE UMLOADED DUE TO ERROR ( 
477 040000 Q.INIT= BIT14 SPARAMETER BLOCK ENQUEVED IR IHITIATICN GUEDE 
a 100000 _ OTBAIT= BIT15 STORIRIT BUS ADDRESS IBCRENERT ’ 
479 
480 eSBTTL PARAMETERS PASSED FROM DRIVER TO PROCRAY 
481 
462 e THE FOLLOWING DEFINITIONS ARE USED PCR REGISTER RETURNS ( 
483 é FROM THE DRIVER TO THE CALLING PROGRAM 
484 
485 000016 P.CSi= 16 SCOMMABD AND STATUS REGISTER 1 ( 
486 000020 P.CS2= 20 SCOMMAED AND STATUS REGISTER 2 
487 000022 P.WCR= 22 3VOPD COUNT RECISTER 
488 000024 P.BAR= 24 3BUS ADDRESS RECISTER ( 
489 000026 P.DTS= 26 SDESIRED TRACK SECTOR RECISTER 
490 000030 P.DCYL= 30 SDESIRED CYLIBDER RECTSTER 
491 000032 P.ASOF= 32 SATTENTION SUMMARY/OFFPSET RECISTES ( 
492 000034 P.ER= 34 ZERROR RECISTER 
493 000036 P.DS= 36 SSTAIUS REGISTER 
894 000040 P.A00= 40 SMESSAGE A STATUS BYTE 00 ( 
495 000042 P.B00= 42 SMESSAGE B STATUS BYTE 00 
496 000044 P.AOI= 44 SMESSAGE A STATUS BYTE 01 
497 000046 P.BO0l= 46 SsMESSAGE P STATUS BYTE 01 ( 
498 000050 P.A1LO= 50 SPESSGGE A STATUS BYTE 10 
499 000052 P.B1O= 52 SMESSAGE ® STATUS BYTE 10 
500 000054 P.All= 54 SMESSACE A STATOS BYTE 11 ( 
501 000056 P.B1l= 56 SsMESSAGE B STATUS BYTE 11 
502 000060 P.EPOS= 60 sECC POSITICH INFORMATION 
ob: 00006? P.EPAT= 62 ZECC PATTERN THPCRMATION ( 

4 

505 eSBTTL DRIVE SPECIFIC PARAMETERS 
506 
507 000064 P.QLNK= 64 SQUEUE LIK 


A3 








( 
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OZR6PB.P11 11-AUG-76 00:00 DRIVE SPECIFIC PARAMETERS S&0 0025 ( 
508 ; THE FOLLOWING DEFINITIONS ARE USED FOR DRIVE PARAMETER ACCESS ( 
509 
510 000066 P.MNCL= 66 PMINIMUM CYLINDER 
$11 000070 P.MXCL= 70 SMAXIMUM CYLIBDES 
512 000072 P.MWTR= 72 sMININOM TRACK ( 
513 000073 P.MXTR= 73 PMAXIMNUM TRACK 
514 000074 P.MNSC= 74 vivivuun SECTOR 
515 000075 P.MXSC= 75 SMAXIMUM SECTCR ( 
516 000076 P.RATE= 76 SPEAD/URITE RATIO 
517 000077 P.AWCK= 77 PAUTOMATIC WRITE CHECK 
518 000100 P.CERT= 100 PCORSECTAPLE BEAD ERROR THRESHGLE ( 
519 000102 P.UERT= 102 JUBCORRECTABLE REPD ERROR TERESACLO 
520 000104 P.SKET= 104 sSEEK ERROR THRESHOLD 
§21 000106 P.MXCD= 106 PMAXINUM COMMANDS ISSUED TO DRIVE ( 
522 000112 P.MXuUT= 112 SMAXEWOM RUMBER WORDS TRANSFERRED 
523 000116 P.SMPL= 116 SSAMPLE COMPARE FLAG 
524 000117 P.ECMP= 117 ECC COMPARE FLAG ( 
525 000120 P.IERC= 120 ZIBHIBIT ERRCR CCRRECTICH 
—* 000121 P.DPAT= 121 sDATA PATTERN USED 
528 ; TRE FOLLOWING DEFINITICHS ARE USED TB STORING 
— 3 CORRENT RANDOMLY GENERATED connand 
5 
531 000122 P.RDPT= 122 PCURRENT RANDOMLY GENERATED DATA PATTERE 
53? 0001223 P.RCHD= 123 SCURREST RABDOMLY GENERATED COnWABD 
533 0001-4 P.RCYL= 124 PCURRENT RANDOMLY GENERATED CYLISDER ( 
534 000126 P.RSEC= 126 SCURRENT RANDOMLY GENERATED SECTOR 
535 000127 PeRTRK= 127 SCURRENT RABDOMLY GENERATED TRACE 
536 000130 P.RWC= 130 SCURGENT RABDCHLY CENERATED WCRD COUNT ( 
537 000132 P.RBAL= 132 SCURREST RANDOMLY GCENERATER BUS ACDRESS 
ase 000134 P.RBAH= 134 
540 3 TRE FOLLOWING DEFINITIONS ARE USED Im STORING 
541 ; LAST ISSUED 
542 ( 
543 000135 P.LCHD= 135 LAST COMMAND 
544 000136 PeLCYL= 136 LAST CYLINDER 
545 000140 P.LSEC= 140 gLaST SECTOR ( 
546 000141 P.LTRK= 141 gLAST TRACK 
547 000142 P.Lwc= 142 Last WORD CCURT 
548 000144 P.LDPT= 144 SLAST DATA PATTERN ( 
549 000145 P.BUFF= 145 sBUFFER ALLOCATED 
( 
( 
( 
( 
( 
z3 
( 





€ 
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DZR6PB.P11 


550 
$51 
552 
$5? 
554 
555 
556 
557 
558 
559 
560 
561 
562 
563 
564 
565 
566 
567 
568 
569 
570 
571 
572 
$73 
574 


11-AUG-76 00:00 


000146 
000147 


000150 


000152 
000156 
000164 
000172 
000174 
000176 
000200 
000202 
000204 
000206 


MACY11 30(1046) 01-DEC 


DRIVE SPECIFIC PARAMETERS 
THE FOLLOWING IS USED FOR THE RETRY SECUERCE 


3 


P.RECT= 
P.RERD= 


P.OSTT= 


3 


P.NODR= 
P.sWRT= 
P.NRD= 

P. SRRD= 
P.SOFF= 
P.SECC= 
P.HARD= 
P. ISXIS 
P. OPIæ 
P.NER= 


146 
147 


150 


sRETRY 
sRETRY 


sDRIVE 
sPIT 0 
2817 1 
sBIT 2 
sBIT 3 
3BIT 4 
sBIT 6 


3 

seit 7 
sBIT 11 
sB1IT 12 
s8IT 13 
2011 14 
sPIT 15 


-77 14815 PAGE 14 


coour 

THOICATION FOR DATA ERRORS 

BOT 18 RETRY SEGUERCE 

REREAD AT CENTER LIBE 

OPFSET #400 MICRO-IBCHES 

BEREAD CRPSET «400 BICEC-IBCHES 
OPFSET -400 HICRO-IBCHES 

REREAD OFFSET -400 PICRO-ISCHES 
CPFSET #600 HICRO-IBCHES 

REREAD CFFSET #800 PICAO-IECHES 
OPFSET -800 MICRO-IBCHES 

REREAD OFFSET -800 WICHO-I1BCHES 
OFFSET #1200 MICRO-INCHES 

REREAD OFFSET #1200 NICRC-INCHES 
OFFSET -1200 MICRO-INCHES 

REREAD CFPSET -1200 MICRO- INCHES 


STATUS IMFORMATION FOR ERGCR PROCESSTIAC 
IWITIAL DATA ERBGR 

DATA ERRCR BEING PROCESSET 

BON-OATA ERROR BEIBC PROCESSED 

SECTOR Ik ERROR PRIBTED 

BEAD REACER ISSUED 

WAITING FOR READ STATUS FCA 
POSITIONING TINE OUT 

FIRST ERROR 

RECALIBRATE HAS BEER TSSUEA 

SEEK RAS BEEN ISSUEC 

OFFSET FAS BEEN ISSUED 

BAD SECTOR PROCESSING FOR WRITE CRECK 
ERRCK ENGUEUVED 


THE FOLLOWING DEFINITIONS ARE USED IM STATISTICAL GATHERING 


152 
156 
164 
172 
i74 
176 
200 
202 
204 
206 


aNUMBER 
sWUMBER 
3 RUMBER 


GP CHDERS (2 WORDS) 
OR WORDS WRITTEN (3 WORDS) 
GF WORDS READ (3 WORDS) 


SNUMBER SCPT EGRCRS (REPEAD CORRECTABLE) 
sWUMBER SOFT ERPCRS (OFFSET CORRECTABLE) 


J NUMBER 
sRUPEER 
3 HUMBER 
SRUMBER 
sRUMBER 


SOFT FRRCRS (ECC CORRECTAPLE) 
OF HAFO DATA ERPCRS 

OF SEEK INCOMPLETE 

OF OPERATION INCOMPLETES 

OF ALL OCTRER ERRORS 


SEQ 0026 


— 
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OZR6PB.P11 11-AUG-76 00:00 DRIVE SPECIFIC PARAMETERS SEG 0027 
596 2 THE FOLLOWING IS USED FOR THE DPIVE ASSIGRNENT SEQUENCE 
597 
598 000210 P.ASSH= 210 JSASSIGCHMERT CONMARD SEQUENCE 
599 30 IWITIAL STATE 
600 2817 O ORIVE SERIAL RUPBER 
601 sBIT 1 START SPIRDLE 
602 sBIT 2 PACK ACKBOWLEDGE 
603 2817 3 READ PACK SERTAL ROPER 
604 sBIT 4 WRITE PACK COMMAND ISSUED 
605 s8IT S ERD OF PACK URITE 
606 2817 6 RECAL 
607 3BIT 7 SECAL AND RETRY READ PACE 
oo. 3 SERTAL RUMBER 
609 
610 000211 P.SEEK= 211 dSEEK TO PREVIOUS CYLINDER PLAC 
611 
612 a TRE FOLLOWING LOCATION IS USED TO INDICATE ERRORS 
613 
614 000212 PERR= 212 2817 2 DATA COWPARTSON ERROR 
615 sBIT 3 DRIVE ERROR BOT REPCHTED 
616 sBIT 4 ORIVE SEIZED TIME OUT 
617 2817 S ORIVE POSITIONING TINE OUT 
618 v 2817 6 ERRCKR URILE ENQUEVED 
619 sBIT 7 ATTERTION WHER ORIVE BOT Is USE 
620 sBIT 6 TINE CUT WHILE WAITING FOR READS 
621 3 TO LOAD AFTER ERROR 
622 sPIT 10 ORIVE BOT READY AFTER START SPIBCLE 
623 sBIT 11 PACK ACKACULEDGCE DID BOT SET VOLUME 
624 é VALID 
625 
626 000214 P.ERHD= 214 SREADER ADDRESS CP FIRST DATA MISCCPPARE (3 BYTES) 
627 000217 P.ERAD= 217 sOFFSET COUNT FROP HEADER ADDRESS 
628 000220 P.CMLG= 270 SCOMPARTSON LEBCTH 
629 000222 P.BFCP= 222 SBUPFER COMPARE LEACTH 
630 
631 3 THE FOLLOWING LOCATIONS APE USED FOR DRIVE SERIAL LUMBER, 
+4 3 PACK SERIAL NUMPER, AND TRACK EXCLUSIONS 

3 

634 000224 P.SERL= 224 SDRIVE SEPIAL BUMBER 
635 000226 P.PKSR= 226 SCARTRIAGE SERIAL MOUMBER 
636 00023? P.EXAR= 232 SEXCLUDED AREA TRFORMATION 


KS 
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DZR6PB.P11 


637 
638 
639 
640 
641 
642 
643 
644 
645 
646 
647 
648 
649 
650 
651 
652 
653 
654 
655 
656 
657 
658 
659 
660 
661 
662 
663 
664 
665 
666 
667 
668 
669 
670 
671 
672 
673 
674 
675 
676 


000174 
000176 


000200 
000204 


000214 
000220 
000224 
000226 


000024 
000044 


001000 
001000 
001062 
001004 
001006 
001010 
001012 


11-AUG-76 00:00 


000174 
000000 
000000 


000137 
000137 
000214 
000137 
000137 
000700 
004574 
001000 


001000 
000024 
000200 
000044 
001000 
001000 


000000 
001170 
003000 
003000 
003000 
000052 


006656 
006646 


006636 
064052 
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TRAP CATCHER 


eSBTTL TRAP CATCHER 


20 
2*ALL UNUSED LOCATIONS FRCH 4 - 776 CONTAIN A %.¢2,HALT® 
S*SEQUENCE TO CATCH ILLEGAL TRAPS AWD INTERRUPTS 
s*LOCATION © CONTAINS O TO CATCH IMPROPERLY LOADED VECTORS 


07174 
DISPREG: .WORD 0 S3SOPTUARE DISPLAY REGISTER 
SWREG: WORD 0 SISOPTWARE SWITCH REGISTER 
eSBTTL STARTING ADDRESS(ES) 
Jue GPSTART 33JUNP TO STARTING ACORESS CF PROCHAN 
JP RESTRT sBRAUCH TO RESTART 
o=214 
JMP PARSRT SCET SYSTEM PARAMETFPRS AND START TESTING 
Jue eeDUNP 3 *8° MEMORY DUNP (DEBUG ORLY) 
eoLOW: 700 sSTART OF DUMP 


eoHIGRS PATTAB-? 
21000 
eS8TTL APT PARAMETER BLOCK 


#SET LOCATIONS 24 AWD 44 AS KEQUIRED FCR APT 
JP MMAeaeaevcavaaanageevenaassnasaeaaagassvasssanasssaaaaaagasanes 
o$X=. 33SAVE CURRENT LOCATION 
o=24  33SET POWER FAIL TC POINT TC STABT CF PROGKAN 
200 33FOR APT START UP 
o=44  99POINT TO APT INDIRECT ADDRESS PRTR. 
SAPTHDR 3;POINT TO APT HEADES BLOCK 
e=e$K 9 9RESET LOCATION COUBTER 
JP AAAAAAAAALAASAARSAHAAAAARAAHRAAHRAAHAAHSAAHHAAHARHHAHAAHAAASEAHES 
dSETUP APT PARAMETER BLOCK AS DEFINES IW THE APT-FDF11 CLAGROSTIC 
sINTERFACE SPEC. 


SAPTHD? 

SHIBTS: .WORD 0 33TWC HIGH BITS CP 16 BIT MATLBCX ACOE. 
SMBADR: .WORD S$MAIL j33ADDPRESS OF APT WATLBOX (BITS 0-15) 
$TSTM: .WORD 3000 33RUN TIM OF LONGEST TEST 


sLAST ADDRESS OF DUP 


S$PASTM: .WORD 3000 33RUR TIME TH SECS. CP 1ST PASS OW 1 UAIT (CCUICK VESIFY) 





SUNITM: .WORPD 3000 SS ADDITIONAL PUN TIPE (SECS) OF A PASS FOR EACH ACODITICHAL UBIT 


eWORD SETEND-SHAIL/2 33LENGTH MAILBOX-ETABLEC WORDS) 


Ls 





DZR6PB.P11 


677 

678 

679 

680 

681 

682 

683 

684 001100 
665 001100 
686 001102 
687 001103 
688 001104 
689 001106 
690 001110 
691 001112 
692 001114 
693 001115 
694 001116 
695 001120 
696 001122 
697 001124 
698 001126 
699 001130 
700 001132 
701 001134 
702 001135 
703 001136 
704 001140 
705 001142 
706 001144 
707 001146 
708 001150 
709 001152 
710 001154 
711 001155 
712 001156 
713 001157 
714 001160 
715 001164 
716 001165 
717 401166 
718 

719 

720 


001170 
001170 
001172 
001174 
727 001176 
728 001200 
001202 
730 001704 
731 001206 
001210 





RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


11-AUG-76 00:00 


001100 


000000 
000 
000 

000000 

000000 

000000 

000000 
000 
001 

000000 

000000 

000000 

000000 

000000 

000000 

000000 
000 
000 

000000 

177570 

177570 

177560 

177562 

177564 

177566 
000 
002 
012 
000 

177607 
077 
01s 

000012 


000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


000377 
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COMMON TACS 


eSBTTL COMMON TAGS 


pp eeaasencagnenenanaaenaanaanaagagaranasasagasAasaaaaaaneananaaes 


d*THIS TABLE CONTAINS VARTOUS COMMON STORAGE LOCATIONS 
s*USED IN THE PROGRAM. 


SCMTAGs 


STSTNMS 
SERFLG: 
SICHT? 

S$LPADR: 
SLPERR=: 
SERTILS 
SITEMBs 
SERMAXS 
SERRPCS 
SGDADR: 
SBDADRs 
$GDDATS 
S$BDDATS 


SAUTOB: 
SINTAG: 


271100 


eWORD 
BYTE 
BYTE 
WORD 
WORD 


WORD 
evcro 
oBYTE 
BYTE 
WORD 
WORD 
WORD 
WORD 
eWORD 
WORD 
WORD 
BYTE 
BYTE 
eWORD 
WORD 


DISPLAY: .WORD 


$TKSs 
$TKB: 
STPS: 
STPBs 
SWULL? 
SPILLS: 
SFILLCs 
$TPFLG: 
$BELL: 
SQUES: 
SCRLF? 
SLF: 


177560 
177562 
177564 
177566 
ePYTE 
BYTE 
BYTE 
BYTE 
eASCIZ 
eASCIT 
eASCIT 
e ASCIZ 


coocoooooocorooocoooco 


12 


0 
<207>€377><377> 
474 

<15> 

<12> 


33START CP 


+ 3CONTAIUS 
ssCONTATES 
s3COBTAIAS 
33 COMTATES 
s3CONTATIUS 
ssCORTATES 
33CONTATES 
s3CONTATES 
> >COBTATES 
ssCOBTATAS 
33COBTATAS 
3;CONTAINS 
ssCOBTATHS 


CCPRCK TAGS 


THE TEST NUMBER 

ERPOR FLAG 

SUPTEST ITERATIGH CCUBT 
SCOPE LOCP ADDRESS 
SCOPE RETURM FOR ERACES 
TOTAL ERRORS DETECTED 
TIEN CONTROL BYTE 

Wax. EPRORS PER TEST 

PC OF LAST ERROR INSTROCTICH 
ADDRESS OF “GOOD” DATA 
ADDEESS OF “BAD° DATA 
*GOOD” DATA 

“BAD? CATA 


ssRESERVED--KCT TC PE USED 


SZ AUTOMATIC MCOE TADICATOR 
SsINTERROPT PCCE INDICATOR 


s3ADDRESS OF SWITCH KEGISTER 
SPADDRESS OF DISPLAY RECISTER 
33TTY KBD STATUS 

33TTY KBD BUFFER 

33TTY PRINTFR STATUS REG. ADDRESS 
3sTTY PRIATER BUFFER REG. ADDRESS 


s3CORTATAS 
33CONTATHS 


WULL CHAFACTER FCK PILLS 
@ CF FILLER CHARACTERS REQUIFEC 


SoINSERT FILL CHARS. AFTER A “LIBRE FEED™ 
SS°TERMTBAL AVAILABLE” PLAG (PIT<C7>=0=VES) 


33CODE FOR 


BELL 


SSQUESTION MARK 


33CABRIAGE 


33LINE FEED 


RETUPB 


Pp eMeenaseneaaneseaaanansagenaseasanaanasacanssananagasanaaaanneans 


APT MAILBOX-ETAPLE 


e SBT TL 


JP SHAAARSL Sosa asaHeAeHeHeHHaAAaHaKenssaaesaasasassagagasanaaasnaes 


oEVEN 
SMAIL?: 
SMSCTY: 
SFATAL: 
STESTR: 
SPASS: 
SDEVCTs: 
SONITS 
SMSGAD: 
$¥SGLG: 
SETABLE: 


- ATEST® 


33APT MAILBOX 


AMSCTY 
AFATAL 


APASS 
ADEVCT 
AUnIT 
ASCAD 
ASCLG 


220ESSAGE TYPE CODE 
S3FATAL ERROR NUMBER 
S3TEST RUMBER 
33PASS COUNT 
Z3DEVICE COUNT 
331/0 UNIT NUMBER 
SSMESSACE ADDRESS 
SSHESSACE LEACTH 


33 APT ENVIRORMERT TOBLE 


m3 





RK611/RKO6 PERFORMANCE EXERCISER PAINDEC DZR6P-A 


DZR6PR.P11 


733° 001210 
734 001711 
735 4001212 
736 001214 
737 «4001716 
73 

739 

740 

741 

742 

743 

744 001220 
745 «#001221 
7146 

747 

748 

749 

750 001222 
751 

752 001224 
753 4001225 
754 001226 
755 001230 
756 001231 
757 001232 
758 001234 
759 001235 
760 001236 
761 001240 
762 001242 
763 001244 
164 0012746 
765 001250 
766 001252 
767 091254 
768 001256 
769 001260 
770 001262 
771 001264 
772 001266 
773° =001770 
774 001272 
775 001274 
71716 001276 
777 001300 
778 0013062 
779 001304 
780 001306 
781 001310 
782 001312 
787 

784 

785 001314 
7846 


11-AUG-76 00:00 


000 
000 
000000 
000000 
000000 


000000 


000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


MACY11 


APT PAILBOX-ETAPLE 


SFNVSs 
SENVMS 
$SWREG: 
SUSUR: 
$CPUOP: 


SMAMS15 
SMTYP1: 
3* 


3* 
9* 
® 


$MADR1: 
& 


3 
SMAMS2s 
SMTYP2: 
SMADQI3 
SPAMS33 
SMTYP33 
S¥ADR23 
SMAMS4s 
SMTYP4: 
SMADR4$ 
SVECTIs 
SVECT2: 
SBASE? 
SDEUM: 
S$COW1: 
$CDW2: 
$sDDWw0?: 
SDDWi: 
$DDW2: 
$D0W3s 
$D0W4: 
$DDWS: 
$S0DW6: 
$DDW7: 
sDDWe: 
sDpowgs: 
$D0W10: 
SD0DW11: 
$00W1 2: 
$D0W13s 
$D0O0W14: 
$O00W153 


SETENDs 


BYTE 
oPYTE 
WORD 
eWOPD 
WORD 


BYTE 
BYTE 


BYTE 
BYTE 
eWORD 
eBYTE 
BYTE 
- WORD 
BYTE 
BYTE 
WORD 
WORD 
eWORD 
- WORD 
e WORD 
-WOPRD 
eWORD 
WORD 
WORD 
WORD 
eWOPD 
eWCRD 
eWOPD 
e WORD 
eWCFRD 
WORD 
e WOPD 
eWCPD 
eWOPD 
eWORD 
- WORD 
-WOPD 
e WORD 


AENYV 
AENVM 
ASWPEG 
AUSWR 
acPuUOoP 


AMAWS1 
AVNTYP1 


AMADR1 


AMAWS2 
AMTYP? 
AMADK2 
AWAMS3 
AMTYP3 
APADR3 
AVAPS4 
AMTYP4 
AMADR4 
AVECT1 
AVECT2 
ABASE 
ADEWM 
ACDuI 
AcDu2 
ADOWO 
aDdDw1 
ADDW2 
ADDW3 
ADDu4 
ADDWS 
ADDW6 
ADDW7 
ADDW8 
ADDW9 
ADDW10 
ADDW1i1 
ADDW1? 
ADDW1? 
ADDULA 
ADDW15 
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SFENVIRONMENT BYT® 

JFENVIROMMENT MODE BITS 

Z3APT SWITCH REGISTER 

33USER SWITCHES 

33CPU TYPE,OPTIONS 

BITS 15-11=CPU TYPE 
11/04=01,11/65=02,11/20=03,11/40=C4,11/45=C* 
11/70=06, P00=07,G=10 

BIT 10=PEAL TIME CLOCK 

BIT Q9=FLOATING POINT PRCCESSOR 

BIT G=MEMORY MANAGEMENT 

s3HTGH ADDRESS,¥.S. BYTE 

37MEM. TYPE, BLK#) 

MEM.TYPE BYTE <-- (RICH BYTE) 
900 MSEC CORE=001 
300 ASEC RIPCLAR=002 
500 NSEC ¥OS=003 

S3HIGH ADDRESS, BLEG1 


MEM.LAST ADDR.=3 PYTES, THIS WCKD AND LCW CP “TYFE" AECVE 


33HIGH ADDRESS,¥.S. BYTE 

37MEM. TYPE, PLE §? 

33MEM.LAST ADDRESS, BLKS2 

33HIGH ADDRESS, ¥.S.BYTE 

33 MEM. TYPE, PLK§3 

3>MEM.LAST ADDRESS, BLEQ? 

33HTGH ADDRESS,¥.S.BYTE 

3 MEM. TYPE, BLE G4 

33MEM.LAST ADDRESS, BLKG4 
SPINTEGRUPT VECTGRE1,PUS FRICRITY#1 
SZ INTERRUPT VECTORG2B0S PRICRITYS2 
S3BASE ADDRESS OF EQUIPWENT UNDER TEST 
ssDEVICE MAP 

s7CONTROLLEP DESCRIPTION WOPRD#1 
S3CONTROLLER DESCRIPTION WORD#2 
sSDEVICE DESCRIPTOR BCROGO 
s3DEVICE DESCPIPTOR wCRDG1 
SsDEVICE DESCRIPTOR WORDS2 
dsDEVICE DESCRIPTOR WORDS? 
s3DFVICE DESCRIPTOR BCKCE4 
33DEVICE DESCRIPTOR BCROES 
dDEVICE DESCRIPTOR eCROPE 
ssCEVICE DESCRIPTOR BCKCG? 
s7DEVICE DESCRIPTOR WORDES 

S27 CEVICE DESCPIPTOR BCROSS 
s2DEVICE DESCRIPTOR BCKDGQ10 
s3DEVICE DESCRIPTCR WORDG11 
ZsDEVICE DESCRIPTOR BCRDG12 
SSCEVICE DESCRIPTCR WCKC 913 
Z30EVICE DESCRIPTOR BORCG14 
s;DEVICE DESCRIPTOR WORDS15 


SEG OC4t 


AY 
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QUEVE HEAD AND TAIL ALLOCATIONS 


DZRE6PB.P11 


787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
200 
R01 
R02 
803 
204 
805 
206 
807 
808 
809 
810 
#11 
#12 
813 
814 


001314 
001320 
001374 
001330 


001334 
001336 
001340 
001342 
001344 
001346 
001350 
001352 


001353 
001354 
001356 
001360 
001361 
001362 
001364 
001365 
001366 
001370 
001372 
001374 
001375 
001376 
001400 
001402 
001404 


001406 
001410 


001412 
001414 
001416 
001420 
001422 


001424 
001426 
001430 
00143? 
001434 
001436 
001440 
001442 


11-AUG-76 00:00 


000000 
000000 
000000 
000000 


172540 
172542 
000104 
177546 
000100 
177514 
177516 

074 


000 
013400 
177777 

000 

000 
000003 

000 

000 
000000 
000000 
000000 

000 

000 
000000 
000000 
000000 
000000 


000000 
000000 


000000 
000000 
000C00 
000000 
000000 


000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


000000 
000000 
000000 
000000 


-SBTTL 


AVAILQ: 
BWAITO: 
CINITQs 
ERRPRQ: 


-S8TTL 


SLKCSR: 
S$LKCSB: 
SLPVEC: 
$LKS3 
SLLVEC: 
stscss: 
SLSDB: 
122 


CLKFRO: 
MAXBUPF: 
PASCUTs 
PERINVs 
PFLAG: 
SOFCMP: 
CPUID: 
OVLYLD: 
HOUR: 
MINUTE: 
SECOND: 
CLKFLG: 
PERIOD: 
TIMHR? 
TIMMINS: 
TIMSEC: 
SAVSURS 


eSBTTL 
T-CS13 
T.CS2: 


T.UCRs 
T.BA: 
T.DA: 
T.DC3 
TeASOF: 


TERS 
T.D0S: 
TeMRI? 
T.MR22 
T.MR32 
T.POS: 
T.PATs 
TDR: 
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QUEVE HEAD AND TAIL ALLOCATICNS 


SYSTEW PARAPETERS 


WORD 
eWORD 
-WOPD 
e WORD 
WORD 
WORD 
eWORD 
BYTE 


BYTE 
eWORD 
WORD 
BYTE 
oBYTE 
WORD 
BYTE 
oPYTE 
WORD 
WORD 
eWORD 
BYTE 
BYTE 
eWCRD 
WORD 
WORD 
WORD 


TEMPORARY 


WORD 
e WORD 
WORD 
eWORD 
- WORD 


- WORD 
eWORD 
eWOPD 
-WOPD 
eWCRD 
eWOPD 
e WORD 
e WORD 


0,0 
0,0 
0,0 
0,0 


172540 
172542 


eocoeocooocooooocwoo 


coocooceo cocoo c So 


SPEAC AWD TAIL OF AVAILABLE QUEUE 

SPEAG AWD TAIL OF BUFFER WAIT QUEUE 

SHEAC AWD TAIL CP CCHMARD IBITIATICN CUFUE 
3PEAD AND TAIL CF ERROR PROCESSING QUEUE 


SADDRESS OF KW11-P STATUS REGISTIER 
SADDRESS OF KW11-P COUNTER BUFFER 
S®WLI-P VECTCR ADCKESS 

ZADDRESS OF KW11-L STATUS REGISTER 
aRW11-L VECTOR ADDRESS 

PADDRESS OF PRINTER STATUS WORD 
ZADDRESS OF PRINTER DATA BUFFER 

374 (60 DECIMAL) IF SYSTEM IS 60 FZ. 
962 (50 DECIMAL) TF SYSTEM 1S 50 #2. 
sCOUBT FOR SECOND 

sMAXIMUM BUFFER FOR READ OR WRITE 
sPASS COUNT 

STUTERVAL BETWEER PERFORMANCE SUPPAFRIES 
SPESTART AND PARAMETER FLAG 

SNUMBER OF SOFTWARE COMPARES 

sCPU DESIGNATION POR PACK WRITING WITR CUAL ACCESS 
SOVERLAY LOADER 

sTIMER FOUR 

STIMER MIRUTE 

3TIPER SECOND 

3FW11-P OR Kwll-“<L PRESENT 

SPERIOD SINCE LAST SATISTIC PRINT COUT 
SHCUK CCUNT FCK FRIRT OUT 

SMINUTE COUNT FOR PRINT OUT 

dSECCND COUNT FOR PRINT OUT 

SSAVED SWITCH REGISTEP FROM POWER FAIL 


CONTROLLER REGISTER STORAGE 


STEMPORARY STORAGE FOR COMMAND ABC STATUS 

3 PEGCISTER 1 

STEMPORARY STCRAGE POR COMMAND ABC STATUS 

3 REGISTER 2° 

STEPECRARY STCKAGCE FCR WORD CCURT KECTSTEF 
STEMPCRARY STORACE FOR BUS ADDRESS FECISTIER 
STEMPORARY STORAGE FOR DISK TRACK AWD SECTCE 
STEMPORARY STCRAGE FOR ORIVE CYLIRCER 
STEMPORARY STCRAGE FOR ATTENTION SUPHPRY 

3 AMD OFFSET 

STEMPORARY STORAGE POR ERROR PECISTER 
STEPEFORARY STCKAGCE FOR CRIVE STATUS REGISTEF 
STEMPORARY STORAGE POR PATNTENANCE PECISTER 1 
STEMPORARY STORAGE FOR WAITNTERANCE RECISTER & 
STEMECRARY STCRAGE PCR PATNTENARCE FECISIFR 3 
STEMPORARY STORAGE FOR ECC POSITICH 
STEMPORARY STORAGE FOR FCC PATTER 

STEMPORARY STCRAGE FOR DATA BUFFER RECISTESR 


SEG 0041 


bY 








REK611/RF06 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


DZR6PR.P11 


843 
844 
R45 
R46 
847 
848 
849 
850 
851 
852 
853 
854 
855 
#56 
657 
858 
859 
860 
861 
"62 
867 
R64 
865 
966 
867 
868 
869 
870 
871 
872 
873 
874 
875 
876 
877 
878 
879 
880 
8861 
88? 
883 
884 
885 
986 
887 
888 
689 
#90 
891 
892 
#93 
894 
895 
896 
897 
898 


001444 
001446 
001450 
001452 
001454 
001456 
001460 


001462 


001464 
001466 


001470 


001472 
001474 
001476 
001500 


001502 
001503 
001506 
001507 


11-AUG-76 00:00 


177440 
000210 
000240 
023676 
024766 
026022 
000000 


000001 
000002 
000004 
000010 
000020 
000040 


000100 
000400 
001000 
002000 
040000 
100000 


000000 


000400 
000400 


000100 


001000 
010000 
000000 
000000 


000 
002 
000 
377 


010 


eSBTTL 


REBAS? 
REVEC: 
REPRI* 
Ae HORM: 
A ABUL: 
A.CONTS 
E.CONT: 


E.CCLR= 
E.NOAT= 
E.UATT= 
E.UDAT= 
E.CLAT= 
E.SCLR= 


E-ILLD= 
E-DOLT= 
E.CERR= 
E.DPAR= 
E.CMTO= 
E.MDS= 


O.WAIT?: 


WeoMTIMS 
WoMILTs 


W.SECs 


W.8SEC: 
WoMINS 

HDR.AD: 
HDR.CT3 


IT.ISRL: 
H-eHEAD: 
W.TIMES 
O.OVER: 


DRIVER PARAMERTERS 


- WORD 
WORD 
WORD 
BORWAL 
APNORM 
CONTRL 
WORD 
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TEMPORARY CONTROLLER REGISTER STOPAGE 


177440 
210 
PRS 


JADDRESS OF RRG611 UNIBUS ADDRESS PELOCF 
sADDEESS OF 6611 VECTOR 

3RK611 INTERRUPT PRIORITY 

JADDRESS OF BORMAL RETURR FROY DATVER 
ZADDERESS CF ABNCHPAL RETURS FROR CETVER 
SADDRESS OF CONTRCLLER ERROR RETURS 
SCONTROLLER ERROR STATUS 


3 THIS LOCATICN 1S CLEARED BREN EVERY CCPH ARC 


3 IS IMITIATED. IPF A CONTROLLES ERROR 
3 OCCURS TRE FOLLOWING BIT ASSICRHENT IS 
3 USED: 


2 

2LEABR CONTROLLER DID WOT CLEAR ESROR 

3NO ATTENTION IW ATTENTION SUPHARY REC 
PUNSCLICATED ATTENTION (SEQUENTIAL CuLY) 
SUMEXPECTED DATA TYPE ERROR 

SATTENTION DID HOT RESET WITH CLEAR 
SSUBSYSTEM CLEAR CID WOT CLEAR ORIVE 

3 ATTENTION 

SILLEGAL DRIVER CCHPAND 

sDATA LATE WHER URLOADING HEADER 
SCORTROLLER ERROR DURTEC DRIVER SERVICING 
SDRIVE DETECTED FARITY ERROP 

SCONTROLLER COMMAND TIME OUT (QUEUDED CHLY) 
SMOLTIPLE DRIVE SELECT 


SPAPAMETER BLOCK CF THE DRIVE 

SWATTIOC FOR COMMAND COMPLETION 

sLOOP COUNTER FOR MILTSECOND SCAB CF DRIVE 
316 MILTSECCHD TIPE FOR PROGRAM 


cPuU VALUE 


11/05 100 

11/10 

11/26 

11/34 

11/40 

11745 4co 

11/£0 

3 11/76 

3SECCND COUNT COUNT FOR ALL COMPARDS 
3 EXCEPT START SPINDLE 

38 SECCHD FCK CRIVE CYCLE CCuN 
SMINUTE TIME FOR STPRT SPIWCLE 
ZADDRESS USED FOR READ ALL HEADERS 
SPUPBER CF HEADERS LEFT TO READ FCR REAT 
3 ALL HEADERS 

sTNTERRUPT Ck RELEASED COMMAND TSSUED 
sHEAD DECODES 

SDRTVFS BEING WATCH-CCG TIMED 
ZOVERLAPPED OPERATIONS 


ese Te Ne Ge Ge Ne Ge Ge Ge Te Te 


SEQ 0043 


cy 








RKGI1/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PB.P11 


999 
900 
901 
902 
903 
904 
905 
904 
907 
908 
909 
910 
911 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 
931 


001510 
001511 
00151? 
001513 
001514 
001515 
001516 
001517 


001520 
001522 
001524 
001526 
001530 
001532 
001534 
001536 


001540 
001542 
001544 
001546 
001550 
001552 
001554 
001556 
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001 
002 
004 
010 
020 
040 
100 
200 


001732 
002710 
002466 
002744 
003222 
003500 
003756 
004734 


000000 
000000 
000000 
000000 
000060 
000000 
000000 
000000 


MACY11 30€1046) 01-DEC-77 
DRIVER PAPAMERTERS 


eSBTTL TABLE OF INTERRUPT MASKS 

INTMSK: .BYTE 1 s INTERRUPT 
eRYTE 2 sTNTERRUPT 
-BYTE 4 pTNTERRUPT 
-BYTE 10 sINTERRUPT 
eBYTE 20 > INTERRUPT 
eBYTE 40 sTRTERROPT 
sBYTE 106 > TUTERROPT 
eBYTE 200 sTNTERRUPT 

oSBTTL PARAMETER BLOCK TABLE 

PRLKT: PARMO sADDRESS OF 
PARW1 dADDRESS OF 
PARM2 pADDRESS OF 
PARM3 dADDRESS OF 
PARM4 sADDRESS OF 
PARYS ZADDRESS OF 
PARM6 ;ADDRESS OF 
PARWT pAODRESS OF 

eSBTTL WATCH-DOG TIMER COUNTS 

W.ORV: .WORD 0 pWATCH-DOG 
eWORD 0 sWATCR-DGC 
-woRD 0 3WATCR-DOG 
-woRD 0 sWATCH-DOG 
eWORD 0 sWATCH-DCG 
eWORD 0 sWATCH-DGG 
-WORD 0 >WATCH-DCG 
eWCRD 0 sVATCH-DCC 


14316 


POF 
FOR 
PCR 
PCR 
FOR 
ror 
FoR 
FoR 


DRIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
DATIVE 
DRIVE 
DRIVE 


DRIVE 0°S 
ORIVE 1°S 
DRIVE 2°S 
DRIVE 3°S 
ORIVE 4°S 
DRIVE S°S 
ORIVE 6°S 
DRIVE 7°S 


FOR 
PCR 
FoR 
PCR 
PCR 
FoR 
FGR 
PCR 


ORIVE 
ChIVe 
DRIVE 
DRIVE 
ORIVE 
DRIVE 
DRIVE 
ChIVE 


TIAQnaeauno 


SAN AWNK SO 


PAGE 21 


PARANETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 


BLOCK 
BLCCK 
BLOCK 
BLOCK 
BLOCK 
BLOCK 
BLOCK 
BLCCK 


SEC 0043 


DY 








RKG11/RKOG PERFORMANCE EXERCISER MATNHDEC DZR6P-8 


DZR6PB.P11 


932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
951 
952 
953 
954 
955 
956 
957 
958 
959 
960 
961 
96? 
963 
964 
965 
966 
967 
968 
969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
9860 
961 
982 
983 
984 


001560 


001562 
001564 
001566 
001572 
001576 
001602 
001606 
001612 
001616 
001622 
001624 
001626 
001627 
001630 
001632 
001634 
001635 
001636 
001640 
001641 
001642 
001644 
001646 
001650 
001651 
001652 
001654 
001656 
001660 
001662 


001664 


001606 
001672 
0¢ 676 
00170? 
001706 
001712 
001716 
001722 
001726 
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000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 

000 
000000 
000000 

000 

000 
000000 

000 

000 
000000 
000000 
000000 

000 

000 
000000 
000000 
000000 
000000 
000000 


000001 


000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


ERCONT: 


ERRPRO? 
TMPCHT: 
TMPTREs 
TMPSEC: 
PARCYL: 
PARTRK: 
PARSEC3 
EXAREA: 
ECCPAT: 
DLTCHTs: 
CUTCHT: 
DRVCHT: 
STATIS: 
RTYBA: 
RTVUCs 
RTYSEC: 
RTYTREs 
RTYCYL: 
RTYSCHs 
RTYCHDs 
HEADI: 
HEAD2: 
HEAD3: 
BSSECT: 
BSTRCKs 
BSCYLNs: 
BSwCs: 
BSBA: 
BSwORD: 
POSCHD: 


- SBTTL 
FBLEC: 
PBLKT?: 


eWCRD 


WORD 
eVORD 
e WORD 
eWCRD 
WORD 
WORD 
WORD 
e WORD 
WORD 
eWORD 
e WORD 
BYTE 
BYTE 
WORD 
e WORD 
BYTE 
BYTE 
eWORD 
BYTE 
BYTE 
WORD 
WORD 
WORD 
BYTE 
BYTE 
eWCFD 
WORD 
WORD 
e WORD 
eWOPD 


FREE SPACE PLOCK 


eWORD 
eWORD 
WORD 
eWOPD 
@WCPD 
eWOPRD 
- WORD 
WORD 
eWOPD 


MACY11 30(1046) O1-DEC-77 14315 PACE 22 
PERFCRMANCE EXERCISER STATUS INPORMATICH 


eSBTTL PERFORMANCE EXERCISER STATUS INFORMATION 


SCOWTRGLLER ERGO (RECOVER APLE) 

sBIT 0 CONTROLLER ERROR HOT PLAGCED 

sBIT 1 WORD COURT BOT EQUAL 0 

sBIT 2 BUS ADDRESS INCORRECT 

sBIT 3 CYLIBDER, TRACK, SECTOR INCORPECT 
sBIT 15 CONTROLLER ERROR DETECTED 


ZADDEESS OF PARAMETER BLOCK PRCCESSINC ERECE 
STRABSFER COUNT CALCULATIONS 

JRAROOM TRACK CALCUATIONS 

SRAWCOM SECTCR CALCULATIONS 

JPARAMETER CYLINDER MODIFICATION 

SPARAMETER TRACK PODIFICATION 

SPARAMETER SECTOR MODIFICATION 

SEXCLUDED AREA CALCULATIONS 

SECC PATTERN POR ECC CORRECTION 

SDATA LATE COURT 

SOTHER CORTROLLER ERRORS COUNT 

SDRIVE COUNT POR CPERATOR COMPARE 

SREPORT INTERVAL STATISTICS 

JRETRY BUS ADDRESS 

SRETRY WORD COUNT 

sSECTOR ADDRESS KETFY 

STRACK ADDRESS RETRY 

SCYLIWDER ADDRESS RETRY 

SUUMBER CF SECTORS TO BE TRANSFERRED IH RETEY 
SCOMMAND BETEG RETRIED 

STEMPORARY STORAGE FOR FIRST WORD OF READEE 
STEMPORARY STORAGE FOR SECOND WORE OF HEATER 
STEMFORARY STCKACE FOR THIED WORE CF REACES 
sSECTOR IW BAD SECTOK SERVICING 

STRACK TH BAD SERCTOR SEVICTEC 

SCYLIWDER If BAD SECTOR SERVICING 

SWORD COUNT IN BAD SECTOR SERVICIBG 

3B8US ADDRESS Im BAD SECTOR SERVICIAC 

SVCROS TRAMSFERREC IN BAG SECTGR SERVICTAC 
SPOSITIONING TIME OUT CCHPARD 


sFREE BLOCK COURT 


SPREE BLOCK 
SPREE BLGCK 
sPREE BLOCK 
sFREE BLOCK 
3PREE BLOCK 
dPREE BLOCK 
SPREE BLOCK 
sFREE BLCCK 
SPREE BLOCK 


OWI —⏑— 


SEG C044 


EY 














RE611/RKO6 PERFORMANCE EXERCISER MATNDEC DZROP-8 MACY11 30(€1046) 01-DEC-77 14:15 PACE 23 
DZR6PR.P11 11-AUG-76 00:00 FREE SPACE PLOCF sto 0645 
985 | 
986 eSBTTL PARAMETER BLOCK FOR DRIVE 0 @ 
987 
988 001732 000 PARMO: .BYTE 0 sDRIVE 0 
989 001733 000 ePYTE 0 COMMAND @ 
990 001734 000000 WORD 0 CYLINDER ADDRESS 
991 001736 000 BYTE 0 SECTOR ADORESS 
992 001737 000 BYTE 0 TRACK ADDRESS ¢ 
993 001740 000 BYTE 0 JOFFSET VALUE 
994 001741 000 BYTE 0 3RUS ADDRESS (BITS 16 ABD 17) 
995 001742 000000 -WOPD 6 3BUS ADORESS (BITS 0 - 15) e@ 
996 001744 000000 WORD 0 WORD COUNT (2°S COPPLEPERT) 
997 001746 000000 WORD 0 ZPROGRAP DRIVE STATUS IPFORPATICS 
998 001750 000000 WORD 0 JCOMMAND AND STATUS REGISTER 1 € 
999 001752 000000 WORD 0 SCOPMAND AND STATUS REGISTER ? 
1000 001754 000000 -worD «0 WORD COUNT RECTSTER 
1001 001756 000000 WORD 0 gPUS ADDRESS BKECISTER € 
1002 001760 000000 ' eworD 0 DESIPED TRACK ABD SECTCR RECISTEF 
1003 001762 000000 WORD 0 DESIRED CYLINDER REGISTER 
1004 001764 000000 word 0 PATTENTION SUPHARY/CEFPSET RECISTEF € 
1005 001766 000000 WORD 0 ZEGRCR PECISTES 
.1006 001770 000000 WORD 0 3STATUS REGISTER 
1007 001772 000000 WORD 0 MESSAGE LIWE A STATUS BYTE 00 G 
1008 001774 000000 ewORD 0 MESSAGE LIBRE B STATUS PYTE 00 
1009 001776 000000 WORD 0 MESSAGE LIWE A STATUS BYTE 01 
1010 002000 000000 WORD 0 MESSAGE LINE B STATUS PYTE 01 € 
1011 002002 000000 ewORD 0 MESSAGE LIWE A STATUS BYTE 10 
1012 002004 000000 WORD 0 MESSAGE LINE B STATUS BYTE 10 
1013 002006 000000 WORD 0 #PESSAGE LIWE A STATUS ®YTE 11 € 
1014 002010 000000 -worD =O MESSAGE LIWE 8 STATUS BYTE 11 
1015 002012 000000 eWCRD 0 3PCC PCSITICN INFCRWATICE 
1016 002014 000000 WORD 6 3ECC PATTERN IBPCRNATION € 
1017 002016 000000 WORD 0 QUEUE LINK 
1918 002020 000000 WORD 0 VINIMOW CYLINDER 
1019 002022 000632 eWORD 410. MAXIMUM CYLINCES € 
1020 002024 000 BYTE 0 MINIMUM TRACE 
1021 002025 002 BYTE 2 s¥AXIWUW TRACK 
1022 002026 000 BYTE 0 g¥ERIMUP SECTOR ¶ 
1023 002027 025 BYTE 21. MAXIMUM SECICE 
1024 002030 003 BYTE 3 PEAC/WRITE BATIC 
1025 002031 000 BYTE 0 AUTOMATIC WRITE CHECK © 
1026 002032 000012 WORD 10. PCORBECTABLE READ ERROR THRESHOLD 
1027 002034 000005 eWORD § ZUNCCREECTABLE PEAD ERRCR THRESACLD 
1028 002036 000005 eWORD 5 3SEEK ERROR TARESROLD € 
1029 002040 177770 177777 WORD 177770,177777 3MAXIMUM RUNBER OF COMMAKDS TO DIVE 
1030 002044 177770 177777 WORD 177770,177777 j3AXIVUP BUPBER CP WORDS TRANSFERRED TC CEIVE 
1031 002050 000 BYTE 0 SAMPLE COMPARE FLAC € 
1032 002051 000 BYTE 0 3ECC COMPARE FLAC 
10332 002052 000 BYTE 0 sIMHIBIT ERRGR CCPRECTICH 
1034 002053 000 BYTE 0 sCATA PATTERR USED C 
1035 002054 000 BYTE 0 CURRENT GEWERATEC DATA PATTERN 
1036 002055 000 BYTE 0 CURRENT RANDONLY GENERATED CONPABC 
1037 002056 000000 ewoRD 0 CURRENT RANDOMLY GENERATED CYLTACER € 
1038 002060 000 BYTE 0 CURRENT RANOCHLY GENERATED SECTCE 
1039 002061 000 BYTE 0 CURRENT RANDONLY GENERATED TRACK 
1040 002062 000000 WORD 0 SCURRENT RANDOWLY GENERATED wORD COUNT & y € 
€ 














RF611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30(1046) O1-DEC-77 14:15 PACE 24 
DZR6PB.P11 11-AUG-76 00:00 PARAMETER BLOCK FOR DRIVE 0 SEG 0046 e 
1041 002064 000000 -woRD 0 CURRENT RABDCHLY GENERATED BUS ACORESS 
1042 002066 000 BYTE 0 C 
1043 002067 000 BYTE 0 3LAST COMMAND 
1044 002070 000000 WORD 0 sLAST CYLINDER 
1045 002072 000 BYTE 0 sLAST SECTOR @ 
1046 002073 000 BYTE 0 sLaST TRACK 
1047 002074 000000 -worD) «0 sLaST WORD COURT 
1048 002076 000 BYTE 0 gLAST DATA PATTERN USED e 
1049 002077 000 BYTE 0 BUFFER ALLOCATED | 
1050 002100 000 ePYTE 0 RETRY COUNT 
1051 002101 000 BYTE 0 #PEREAD STATUS e@ 
1052 002102 000000 WORD 0 DRIVE STATUS FLAGS 
1053 002104 000000 000000 WORD 0,0 sUMBER OF ORDERS 
1054 002110 000000 000000 000000 WORD 0,0,0 HUMBER CP WORCS WRITTER e 
1055 002116 000000 000000 000000 eWORD 0,0,0 NUMBER OF WORDS PED 
1056 002124 000000 ewORD 0 PRUMBER OF SOPT ERRORS (REREAD CORRECTAPLE) 
1057 002126 000000 WORD 0 PRUPBER OF SOPT EBRCRS (COPFSET CCHRECTAPLE) @ 
1058 002130 000000 eWORD 0 HUMBER OF SOPT ERRORS (ECC CORPRECTABLE) 
1059 002132 000000 WORD 0 2WOMBER OF HARD DATA ERRORS 
1060 002134 000000 -woRD 0 JRUMBER OF SEEK INCONPLETES 
1061 002136 000000 eWORD 0 ZWOMBER CP PISPOSITICNING EBRCES 
1062 002140 000000 -woRD 0 HUMBER OF ALL OTRER ERRORS 
1063 002142 000 BYTE 0 JASSICUPERT COMMARD SEQUENCE 
1064 002143 000 BYTE 0 SEEK 10 PREVICUS COMMAND FLAG 
1065 002144 000000 eWORD 0 ZERRCR STATUS INFCRPATICE 
1066 002146 000000 ewORD 0 PREACER ADDRESS CP FIRST MISCOMPSFE ERRCE 
1067 002150 000 BYTE 0 
1068 002151 000 ePYTE 0 JOFFSET ADDRESS FROW HEADER ADDRESS 
1069 002152 000000 eWORD 0 3COWPARTSON LEACTP 
1070 002154 000000 eWORD 0 BUFFER COMPARISON LENGTH 
1071 002156 007777 e¥VORD 007777 DRIVE SERIAL BOMBER 
1072 002160 000000 000000 WORD 0,0 SCARIAGE SERIAL BOMBER 
1073 002164 000000 000000 WORD 0,0 ZPIRST EXCLUSICR BREA 
1074 002170 000000 000000 WORD 0,0 SECOND EXCLUSION APEA 
1075 002174 000000 000000 -WOPD 0,0 THIRD EXCLUSION AREA 
1076 092200 000000 000000 WORD 0,0 POURTH EXCLUSION AREA 
1077 002204 000000 000000 eWCPD 0,0 ZPIFIH EXCLUSION AREA 


GY 
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DZR6PB. PII 


1078 
1079 
1080 
1081 
1082 
1083 
1084 
1085 
1066 
1067 
1068 
1089 
1090 
1091 
1092 
1093 
1094 
1095 
1096 
1097 
1098 
1099 
1100 
1101 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1110 
1111 
111? 
1113 
1114 
1115 
1116 
1117 
1118 
1119 
1120 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1129 
1130 
1131 
1132 
1133 


002210 
002211 
002212 
002214 
002215 
002216 
002217 
002220 
002222 
002224 
002226 
002230 
002232 
002734 
002236 
002240 
002242 
002244 
002246 
002250 
002252 
002254 
002256 
002260 
002262 
002264 
002266 
002270 
002272 
002274 
002276 
002300 
002302 
002303 
002304 
002305 
002306 
002307 
002310 
00231? 
002314 
002316 
002322 
002326 
002327 
002330 
002331 
002332 
002333 
002334 
002336 
002337 
002340 
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001 
000 
000000 
000 
000 
000 
000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
v00000 
000000 
00063? 
000 
002 
000 
025 
003 
000 
000012 
000005 
000005 
177770 
177770 
000 
000 
000 
000 
000 
000 
000000 
000 
000 
000000 


177777 
177777 


PARM1: 
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PARAM,TER BLOCK FOR DRIVE © 


PARAMETER BLOCK FOR ORIVE 1 


BYTE 
BYTE 
WORD 
BYTE 
BYTE 
BYTE 
BYTE 
WCRD 
WORD 
WORD 
eWCRD 
WORD 
WORD 
WORD 
WORD 
eWORD 
WORD 
e WORD 
WORD 
WORD 
e WORD 
e WORD 
e¥ORD 
WORD 
WORD 
WORD 
WORD 
WORD 
e WORD 
eVORD 
e¥VORD 
WORD 
eoPYTE 
BYTE 
ePYTE 
BYTE 
BYTE 
BYTE 
WORD 
WORD 
eWORD 
WORD 
WORD 
BYTE 
BYTE 
@BYTE 
BYTE 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
eWORD 


@ooocoocecoceccoececoocoocoococococooocr 


= 
o 
r 


— 
o 


SOE Coyone 
9 


177770,177777 
177770,177777 


ceoocoococoo 


sDRIVE 1 

sCOPMMAND 

SCYLINDER ADDRESS 

sSECTCR ADOPESS 

STRACK ADDRESS 

JOFFSET VALUE 

g8US ADDRESS (BITS 16 AWD 17) 
gRUS ADDRESS (BITE © - 15) 

SWORD COUNT (2°S COPPLEVENT) 
SPROGRAP DRIVE STATUS IPPFORPATICS 
SCOMMABD ANC STATUS KEGCTISTESR 1 
SCOMMABD AND STATUS REGISTER 2 
SWORD COURT REGISTER 

g8US ADDRESS RECISTER 

SDESIRED TRACK ABD SECTCR RECTSTES 
SDESIRED CYLIBDES REGISTER 
SATTERTION SUPMARY/OFFSET REGISTER 
SERRGR RECISTER 

SSTATUS RECTISTER 

SMESSAGCE LINE A STATUS BYTE 00 
SMESSAGCE LIFE B STATUS BYTE 00 
SPESSAGE LIFE A STATUS BYTE 01 
SMESSAGE LIBRE B STATUS BYTE 01 
SMESSAGE LIWE A STATUS BYTE 10 
SPESSAGE LIBRE B STATUS BYTE 10 
sMESSAGCE LIWE A STATUS BYTE 11 
SMESSAGE LIE B STATUS BYTE 11 
JECC POSITION IRFCRPATICE 

sPCC PATTERN IBPCRNATION 

sQUEUE LIK 

SPIWIMOM CYLINDER 

SPAXIMOM CYLIFDER 

sPINIMUM TRACE 

SMAXIMUM TRACK 

sMINIMUM SECTOR 

SMAXIMUM SECTCR 

SREAC/URITE GATIC 

SAUTOMATIC WRITE CHECK 
SCORRECTABLE READ ERROR THRESFOLD 


SUBCORRECTARBLE READ ERROR THRESHCLO 


SSEEKR ERRCR TRRESHCLD 


SMAXIMUM HUPBER CF COMMANDS TO DRIVE 
SMAXIMUM BUPBER CPF WORDS TRANSPFERPED TO DFIVE 


SSAPFLE COMPARE FLAG 

3ECC COMPARE PFLAG 

SIMAIBIT ERROR CORRECTION 

SDATA PATTERD USED 

SCURGENT CERERATEC DATA PATTERD 


SCURRENT RANDOMLY GENERATED CONWABD 
SCURRENT RARDOMLY GENERATED CYLISCER 


SCURREBT RARDOMLY GENERATED SECTCR 
SCORSERT RAWCCHLY GENERATED TEACK 


SCURRENT PARCCHLY GENERATED WORD COUNT 


SEG 0047 


#4 





e@ @ @ @ @ @ @ @ @ @ 
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1134 
1135 
1136 
1137 
1138 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 
1149 
1150 
1151 
1152 
1153 
1154 
1155 
1156 
1157 
1158 
1159 
1160 
1161 
1162 
1163 
1164 
1165 
1166 
1167 
1168 
1169 
1170 


002342 
002344 
002345 
002346 
002350 
002351 
002352 
002354 
002355 
002356 
002357 
002360 
002362 
002366 
002374 
002402 
002404 
002406 
002410 
002412 
002414 
002416 
002420 
002421 
002422 
002424 
002426 
002427 
002430 
002432 
002434 
002436 
002442 
002446 
002452 
002456 
002462 
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000000 
000000 000000 
000000 000000 


PARAMETER BLOCK 


WORD 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
BYTE 
oP YTE 
WORD 
WORD 
«WORD 
WORD 
WORD 
WORD 
WORD 
e WORD 
e WORD 
WORD 
WORD 
BYTE 
BYTE 
WORD 
e¥OPD 
BYTE 
BYTE 
WORD 
e¥OPD 
eWOPD 
WORD 
eWCRD 
-¥O°D 
WORD 
WORD 
WCPO 
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FOR ORIVE 1 
0 


eoococ 
288 
ooo 
s 8 
oo 


SCURRENT RANDOMLY GENERATED BUS ACORESS 


sLaST CONMARD 

SLAST CYLINDER 

dLAST SECTOR 

gLAST TRACK 

sLaST WORD CCUST 

SLAST DATA PATTERR USED 

sBUPFER ALLOCATED 

sRETRY COUNT 

SREREAD STATUS 

sDRIVE STATUS FLACS 

sWUMBER OF OCROERS 

SROMBER CP WOROS WRITTER 

sWOrPBER CP WCROS FEAD 

JUUMBER OF SCPT ERRORS (REREAD CCRRECTAPLE) 
SRUMBER OF SOFT ERRORS (COPFSET CCRRECTABLE ) 
anUreem Cr SCT EWACRS CECC CORPECTABLE) 
sBOMBER OF RARD DATA ERRORS 

sVOMBER OF SEEK IBCOMPLETES 

SRUMBER CP WISPOSITIONING ERRORS 

sRUrees Cr ALL CIHER ERRORS 

JASSIGUMERT COMMABD SEQUENCE 

sSEEK TO PREVIOUS COMMAND FLAC 

SERRCR STATUS IRFCROATICA 

SREADER ADDRESS GF FIRST MISCOMPARE EPRCE 


ZOFPSET ADORESS FROP HEADER ADDRESS 
sCOMFARTSON LEBCGIV 

sBUFPFER COMPARISOR LENGTH 

JORIVE SERIAL BOMPER 

SCARIAGE SERIAL BOMPER 

SPEPST EXCLUSICH AREA 

SSECOWD EXCLUSION APEA 

STHIRD EXCLUSION AREA 

sPFOURTH EXCLUSION AREA 

SPIFIA EXCLUSICH AREA 


SEG C046 


FY 








@9eeeeeeeseeeee e®e 
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1171 
1172 
1173 
1174 
1175 
1176 
1177 
1178 
1179 
1160 
1181 
1182 
1183 
1184 
1185 
11866 
1187 
1188 
1189 
1190 
1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1202 
1203 
1204 
1705 
1206 
1207 
1208 
1209 


1210. 


4211 
1212 
1213 
1214 
1215 
1216 
1217 
1218 
1219 
1220 
1221 
1222 
1223 
1224 
1225 
1226 


002466 
002467 
002470 
002472 
002473 
002474 
002475 
002476 
002500 
002502 
002504 
002506 
002510 
002512 
002514 
002516 
002520 
002522 
002524 
002526 
002530 
002532 
002534 
002536 
002540 
002542 
002544 
002546 
002550 
002552 
002554 
002556 
002560 
002561 
002562 
002563 
002564 
002565 
002566 
002570 
002572 
002574 
002600 
002604 
002605 
002606 
002607 
002610 
002611 
002612 
002614 
002615 
002616 
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000 
000012 
000005 
000005 
177770 
177770 

000 

000 

000 

000 

000 

000 
000000 

000 

000 
000000 


177777 
177777 


e SBTTL 
PARM23 
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PARAMETER BLOCK FOR DRIVE 1 


PARAMETER BLOCK FOR ORIVE 2 


BYTE 
BYTE 
e WORD 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
WORD 
e WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
e WORD 
WORD 
WORD 
e¥ORD 
WORD 
WORD 
WORD 
eWORD 
WORD 
eWCRD 
WORD 
eWOPD 
WORD 
WORD 
WORD 
WORD 
oPYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
WORD 
WORD 
eWOPD 
WORD 
BYTE 
BYTE 
BYTE 
BYTE 
oBYTE 
BYTE 
WORD 
BYTE 
BYTE 
WORD 


2 


WAUrPOownwonwohooocooccococcoocoococoecoceoecocecocecoco 


177770,177777 
177770,177777 


sDRIVE 2 

sCOMMARD 

SCYLIWDER ADORESS 

sSECTOR ADDRESS 

STRACK ADDRESS 

sOFPSET VALUE 

gBUS ADDRESS (BITS 16 ABD 17) 

gRUS ADDEESS (BITS O = 15) 

SWORD COURT (2°S COMPLEFERT) 
SPROGRAM DRIVE STATUS IBFORMATIOS 
SCOMMAND AND STATOS REGISTER 1 
SCOMMAND AND STATUS REGISTER 2 
SWORD COURT KECTISTER 

280s ADDRESS REG. STER 

SDESIPED TRACK ABD SECTOR RECISTES 
SDESIRED CYLINDER RECISTER 
SATTENTION SUMMARY/OFFPSET REGISTER 
SERROR RECISTER 

sSTATUS RECTSTER 

SMESSAGE LINE A STATUS BYTE 00 
SPESSAGE LIWE B STATUS BYTE 00 
SMESSAGCE LINE A STATUS BYTE 01 
SMESSAGE LIWE B STATUS BYTE 01 
SMESSAGE LIWE A STATUS BYTE 10 
SPESSACE LIWE B STATUS BYTE 10 
SMESSAGE LIWE A STATUS BYTE 11 
SMESSACE LIRE B STATUS BYTE 11 

3ECC POSITION IMFCRPATICH 

sECC PATTERN TRFCRMATICN 

sQUEVE LINK 

SPIWIMNUM CYLIRODES 

SPAXIPUM CYLIPDER 

sPIRIPUP TRACE 

SMAZIMOM TRACK 

SVINIMOM SECTOR 

SPAXIPUP SECTOR 

SREAC/URITE KATIC 

ZAUTOMATIC WRITE CHECK 

SCORRECTABLE READ ERROR TRRESROLE 
JUNCCRRECTABLE READ ERROR THRESACLO 
sSEEK ERACR THEESHCLO 

SMAXIMUM ROPBER CF COMMANDS TO CEIVE 
SPAXIVUP RUPBER CF WORDS TRANSFERRED TO OFIVE 
SSAMELE CCHPARE FLAG 

ZECC COMPARE PFLAG 

SIMAIBIT ERRCR CORKECTION 

SDATA PATTERR USED 

sCURBENT CERERATED CATA PATTERD 
SCUPRENT RANDCMLY GENERATED COMPARD 
SCURRFNT RANCOMLY GENERATED CYLISCER 
SCURREDT RARDCHLY GENERATED SECTCR 
SCURBERT PANCCHLY GENERATED TRACK 
SCURKENT RARDCHLY GENERATED BORD COUNT 


oY 


e@ 0@ @ @ @ @ @ @ @ @ @ @ @ ®@ 


|. 
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OZR6PB.P11 


1227 
1228 
1229 
1230 
1231 
1232 
1233 
1234 
1235 
1236 
1237 
1238 
1239 
1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 
1248 
1249 
1250 
1251 
1252 
1253 
1254 
1255 
1256 
1257 
1258 
1259 
1260 
1261 
1262 
1263 


002620 
002622 
002623 
002624 
002626 
002627 
002630 
002632 
002633 
002634 
002635 
002636 
002640 
002644 
002652 
002660 
002662 
002664 
002666 
002670 
002672 
002674 
002676 
002677 
002700 
002702 
002704 
002705 
002706 
002710 
002712 
002714 
002720 
002724 
002730 
002734 
002740 


11-AUG-76 00:00 


PARAMETER BLOCK 


WORD 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
e WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
e¥VORD 
WORD 
WORD 
eWOPD 
BYTE 
BYTE 
WORD 
WORD 
BYTE 
BYTE 
WORD 
WORD 
WORD 
eWORD 
- WORD 
WORD 
eWOPD 
WORD 
eWOPD 
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FOR ORIVE 2 


ooo 
ses 8 
eco 
s@ 
oo 


SEQ OOf6 
SCURRENT RANDOMWLY GENERATED BUS ACCRESS 


sLAST COMPARE 

SLAST CYLINDER 

sLAST SECTOR 

gsLAST TRACK 

sLast wCaRD COUNT 

SLAST DATA PATTERR USED 

sBUPFER ALLOCATED 

sRETRY COUNT 

SREREAD STATUS 

sORTVE STATUS FLACS 

SRUMBER OF ORDERS 

SNOPBER OCF WORDS WRITTES 

3HOMBER CP WORDS BEAD 

SUUMBER OF SOFT ERRORS (REREAD CORRECTABLE) 
SUOMBER OF SOFT ERRORS COPFSET CCRRECTAPLE) 
SRUMNBER GF SOFT ERRORS (ECC CORRECTABLE) 
SHUMBER CF RAPD DATA ERRORS 

SUUMBER OF SEEK IBCONPLETES 

SRUNBER CF WISPOSITIONING ERRORS 

SROMBER CF ALL CIBER ERECRS 

JASSIGHMERT COMMNARD SEQUENCE 

sSEEK TO PREVIOUS COMMARD FLAG 

JERROR STATUS IBPCREATICH 

SREACER ADDRESS CF FIRST WISCCHPAFE ERRCE 


SOFFSET ADDRESS FROP HEADER ADDRESS 
sCOPPARTSON LEACTR 

SBUPFER CCHPARISCH LENGTH 

SDRIVE SERIPL BOMBER 

SCARIAGE SERIAL BUNBER 

JPIRST EXCLUSICN AREA 

sSECCRD EXCLUSICH AFEA 

STHIRD EXCLUSION #REA 

sPOURTH EXCLUSION AREA 

SFIFTH EXCLUSTOW AREA 


KF 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PB.P11 


1264 
1265 
1766 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1278 
1279 
1280 
1261 
1282 
1283 
1284 
1265 
1286 
1287 
1268 
1289 
1290 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 
1305 
1306 
1707 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 


002744 
002745 
002746 
002750 
002751 
002752 
002753 
002754 
002756 
002760 
002762 
002764 
002766 
002770 
002772 
002774 
002776 
003000 
003002 
003004 
003006 
003010 
003012 
003014 
003016 
003020 
003022 
003024 
003026 
003030 
003032 
003034 
003036 
003037 
003040 
003041 
003042 
003043 
003044 
003046 
003050 
003052 
003056 
003062 
003063 
003064 
003065 
003066 
003067 
003070 
003072 
003073 
003074 


11-AUG-76 00:00 


000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000632 
000 
002 
000 
025 
003 
000 
000012 
000005 
000005 
177770 
177770 
000 
000 
000 
000 
000 
000 
000000 
000 
000 
000000 


177777 
177777 


¢ SBTTL 
PARM3: 





MACY11 30€(1046) O1-DEC-77 14315 PAGE 29 
PARAMETER BLOCK FOR DRIVE 2 


PARAMETER BLOCK FOR DRIVE 3 


BYTE 
BYTE 
WORD 
BYTE 
BYTE 
BYTE 
BYTE 
·voeo 
WORD 
WORD 
e WORD 
WORD 
WORD 
WORD 
e WORD 
eWCFPD 
WORD 
WORD 
e WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
eWORD 
WORD 
WORD 
WORD 
WORD 
e WORD 
WORD 
eo BYTE 
oPYTE 
BYTE 
eo PYTE 
BYTE 
ePYTE 
e¥WCRD 
WORD 
WORD 
eWCPD 
e WORD 
BYTE 
BYTE 
BYTE 


wUNrownonoeaoocooocecoocoocecceoococceceoecoceoeceoecoecow 


177770,177777 
177770,177777 


ecoceococeocoo 


sDKIVE 2 

sCOMNAND 

SCYLINDFER ADDRESS 

sSECTOR ADDRESS 

3TRACK ADDRESS 

SOPFSET VALUE 

3BUS ADDRESS (BITS 16 ABD 17) 

gRUS ADDRESS (BITS 0 = 15) 

SWORD COURT (2°S COMPLEMENT) 
SPROGRAW ORIVE STATUS INFORPATIOR 
SCOMMAND ABD STATUS REGISTER 1 
SCGMPAED AND STATUS REGISTER 2 
SWORD COUNT REGISTER 

sRUS ADDRESS RECISTER 

SDESIRED TRACK ABD SECTCR RECTSTES 
SDESIRED CYLIBDCEG KRECTSTER 
PATTENTION SUPHARY/OFPSET REGISTES 
SERROR RECISTER 

sSTAIUS REGISTER 

SPESSAGE LIEBE A STATUS BYTE 00 
SMESSAGE LIWE B STATUS BYTE 00 
SMESSAGE LI®E A STATUS BYTE 01 
SPESSAGCE LIBE B STATUS BYTE 01 
SMESSAGCE LIWE A STATUS BYTE 10 
SMESSACE LIBRE B STATUS BYTE 10 
SMESSAGE LIVE A STATUS BYTE Al 
SMESSAGE LIWE 8 STATUS BYTE 11 

3ECC POSITION I®FCRPATION 

gECC PATTERN TRPGCRMATION 

sQUEUE LIWK 

sMINIPUM CYLIBDES 

SPAXIPOM CYLINDES 

sVIRIMUY TRACE 

SPARIPUP THRACE 

sMINIMUP SECTCR 

sPAXIPUR SECTOR 

SREAD/URITE RATIC 

ZAUTCMATIC WEITE CHECK 

SCORRECTABLE READ ERROR THRESFOLE 
SUBCORRECTAR‘.E READ ERROR TRRESHCLO 
sSEEK ERROR IHRESHCLD 

SPAXIMPUM RUPBZE CP COMMANDS TC CEIVE 
SPAXIVUM HUPBER CF WORDS TRANSFERRED TO CEIVE 
SSAMELE COMPARE FLAC 

3ECC CCWPARE FLAG 

STIMRIBIT ERPCR CCERECTICH 

sDATA PATTEPR USET 

SCURRENT CERERATED DATA PATTERD 
SCURGFHUT RARCCHLY GENERATED CCHPASC 
SCUPRENT RABDCHLY GENERATED CYLIBCTER 
SCURRENT RANDCPLY CENERATED SECTCE 
SCURGENT PARDCHLY GENERATED TRACE 
SCUPBPAT RARDCHLY GENERATED UCRD CCONT 


ty 


@ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ 





RKG11/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 
OZR6PB.P11 11-AUG-76 00:00 


1320 003076 000000 
1321 003100 000 
1322 003101 000 
1323 003102 
1324 003104 000 
1325 003105 000 
1326 003106 
1327 003110 000 
1328 003111 000 
1329 003112 000 
1330 003113 000 


1331 003114 

1332 003116 000000 000000 

1333 003122 000000 000000 
1334 003130 000000 000000 
1335 003136 
1336 003140 
1337 003142 
1338 003144 
1339 003146 
1340 003150 
1341 003152 
1342 003154 000 
1343 003155 000 
1344 003156 
1345 003160 
1346 003162 000 
1347 003163 000 
1348 003164 
1349 003166 
1350 003170 
1351 003172 
1352 003176 
1353 003202 
1354 003206 
1355 003212 
1356 003216 


000000 
000000 
000000 
000000 
000000 


PARAMETER BLOCK 


WORD 
oPYTE 
BYTE 
WORD 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
WORD 
WORD 
e WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
e WORD 
e WORD 
BYTE 
BYTE 
WORD 
WORD 
BYTE 
BYTE 
WORD 
@WOPD 
WORD 
WORD 
WORD 
eWOPD 
eWORD 
e¥OPD 
-WOPD 
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oco 
*®es8 
ooo 
8 
ao 


007777 


SCURRENT RAWDCHLY GENERATED BUS ACORESS 


sLAST CONMARD 

sLaSt CYLINDER 

sLAST SECTOP 

sLAST TRACK 

dLAST WORD COURT 

sLaST DATA PATTERH USED 

SBUPFER ALLOCATED 

sRETRY COUNT 

SREREAD STATUS 

sDRTVE StaTUs FLACS 

SWONBER OF ORDERS 

SRUMBER OF WORDS WRITTEN 

SRUMBER OF WCROS READ 

sRUMBES CP SCPT EPRORS (REREAD COSRECTABLE) 
SRUMBER OF SCPT ERRORS (OFFSET CGRRECTAPLE ) 
SRUMBER OF SOFT ERRORS (ECC CORRECTABLE) 
SRUMBER CP RARD DATA ERBORS 

SROMBER CF SEEK INCCHPLETES 

SUUMBER OF MISPOSITIONING ERRORS 

SRUPBER OF ALL OCTFER ERRORS 

DASSIGHMERT COHPABD SEQUENCE 

sSEEK TC PREVICUS COMMAND FLAG 

SERROR STATUS INFCRHATION 

SREADER ADDRESS CF FIRST MISCONPARE ERRCE 


SOFFSET ADDRESS FRO READER ADDRESS 
sCOMFARTSON LERGTR 

sB0FFER COMPARISON LENGTH 

SDRIVE SERIAL BUMPER 

SCARIAGE SERIAL HUMBER 

SPIRST EXCLUSION AREA 

SSECCRD EXCLUSION AREA 

sTHIED EXCLUSICNH AREA 

SPOURTH EXCLUSION AREA 

SPIFTA EXCLUSION AREA 


My 


@ 


R¥611/R2KO6 PEPFORPAWCE FXERCISER MAINDEC DZR6P-B 


D7ZR6PR.P11 


1357 
1358 
1359 
1360 
1361 
136? 
1363 
1364 
1365 
1766 
1367 
1368 
1369 
1370 
1371 
1372 
1373 
1374 
4375 
1376 
1377 
1778 
1379 
1360 
1381 
1382 
1383 
1364 
1385 
1386 
1387 
1368 
1389 
1390 
1391 
139? 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
1411 
1412 


00322? 
003223 
003224 
003726 
003227 
003230 
003231 
00323? 
003234 
003236 
003240 
003242 
003244 
003246 
003250 
003252 
003254 
003256 
003760 
003262 
003264 
003266 
003270 
003272 
003274 
093276 
003300 
003302 
003304 
003306 
003310 
003312 
003314 
003315 
003316 
003317 
003320 
003321 
003322 
003324 
003326 
003330 
003334 
003340 
003341 
003342 
003343 
003344 
003345 
003346 
003350 
003351 
003352 


11-AUG-76 00:00 


004 
000 
000000 
000 
000 
000 
000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000632 
000 
002 
000 
025 
003 
000 
000012 
000005 
000005 
177770 
177770 
000 
000 
000 
000 
000 
000 
000000 
000 
000 
000000 


177777 
177777 


MACY11 30(1046) 


PARAMETER BLOCK FOR DPIVE 3 


« SBTTL 
PARM4: 
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PARAMETER BLOCK FCR DPIVE 4 


BYTE 
ePYTE 
WORD 
BYTE 
oPYTE 
BYTE 
eP®YTE 
e WORD 
e WORD 
WORD 
e WORD 
eWCPD 
-¥WORD 
WORD 
e WORD 
WORD 
-WOPD 
eWORD 
eWOPD 
«WORD 
-WOPD 
eWORD 
WORD 
-WOPD 
WORD 
eWOPD 
-WORD 
WORD 
-WOPD 
eWCRD 
-WOPD 
e WORD 
oBSYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
-WORD 
- WORD 
eWCFD 
WORD 
BYTE 
BYTE 
eBYTE 
BYTE 
BYTE 
BYTE 
e WORD 
BYTE 
BYTE 
eWOPD 


UUVUireOCOWNONOhBOCCCeCoccCecacoocoaoocoocoocooooocoeooocos 


1777704177777 
177770,177777 


coocooococo 


sDRTVE 4 

3CCMPAAD 

sCYLINDER ADDRESS 

SSECTOR ADDRESS 

sTRACF ADDRESS 

ZOPFSET VALUE 

sPUS ADDRESS (BITS 16 AND 17) 
sBUS BODRESS (BITS C - 15) 

sWORC COURT (2°S COVPLEPERT) 
SPROGPAW DRIVE STATUS INFORPATICH 
SCOMMARD AND STATUS REGISTER 1 
SCCHMARD AND STATUS REGISTER 2 
sWOPC COUNT REGISTER 

sPUS ADDRESS REGISTER 

SDESIRED TRACK ABC SECTCR REGISTER 
SDESIPFED CYLINDER KEGISTER 
ZATTENTION SUPMARY/CFFPSET REGISTEF 
sERPOR REGISTER 

SSTATUS REGISTER 

SPESSAGE LINE A STATUS PYTE OO 
SMESSAGE LINE B STATUS BYTE 00 
SMESSAGE LIFE A STATUS BYTE 01 
SMESSAGE LINE B STATUS PYTE 01 
sVESSAGE LINE A STATUS BYTE 10 
SMESSAGE LINE B STATUS BYTE 10 
SMESSAGE LIFE A STATUS PYTE 11 
SMESSAGE LINE B STATUS BYTE 11 
3FCC POSITION INFCRPATION 

3FCC PATTERN INFORMATION 

sCUFUE LINK 

sVIWNIMUM CYLINDER 

SMAXIVUP CYLINDFE 

s¥IRIMUW TRACE 

sMAXIMUM TRACE 

sVINIMUM SECTCR 

sMAXIMUM SECTCR 

SPEAD/WRITE KATIC 

SAUTCMATIC WhITE CHECK 
sCOPRECTABLE FEAD EPROR THRESPOLC 


ZUNCCRRECTARLE READ ERROR TPRESHCLO 


sSEEK ERROR TARESHRCLD 


SMAXIMUY FUPBER CF CC¥MANDS TC CEIVE 
sVAXIMUY NUMBER CF WORDS TRANSFEKFED TO CRIVE 


SSAPELE COMFAFE FLAC 

sECC CC¥PARE FLAG 

SINPIBIT ERRCP CCRRECTION 

SDATA PATTERN USED 

SCURKENT CEWERATEC CATA PATTERN 


sCURBEAT RANCCPLY GENFRATEC CCMPARC 
SCURRENT RANCCMLY GENERATED CYLYACEP 


SCURRFNT RANDOMLY GENERATED SFCTCE 
SCURRENT RAWDCHLY GENERATED TRACK 


SCURFENT RARCCHLY GEAERATED BCRC CCUNT 


AS 
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1413 
1414 
1415 
1416 
1417 
1416 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1426 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 


003354 
003356 
003357 
003360 
003362 
003363 
003364 
003366 
003367 
003370 
003371 
003372 
003374 
003400 
003406 
003414 
003416 
003420 
003422 
003424 
003426 
003430 
003432 
003433 
003434 
003436 
003440 
003441 
003442 
003444 
003446 
003450 
003454 
003460 
003464 
003470 
003474 


11-AUG-76 00:00 


000000 
000000 

000 

000 
000000 
000000 
007777 
000000 
000000 
000000 
000000 
000000 
000000 


000000 
000000 
000000 
000000 
000000 
000000 


PARAMETER BLOCK 


WORD 
oSYTE 
BYTE 
WORD 
BYTE 
BYTE 
eWORD 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
«WORD 
WORD 
WOPD 
WORD 
WORD 
BYTE 
BYTE 
eWOPD 
- WORD 
BYTE 
BYTE 
WORD 
e WORD 
WORD 
eWOPD 
e WORD 
WORD 
WORD 
WORD 
WORD 
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FOR DRIVE 4 


ooo 
se 8 
oococ 
e8 
oo 





SCURKENT RANDOMLY GENERATED BUS ACDRESS 


SLAST COMMARD 

sLAST CYLINDER 

sLAST SECTOR 

dLAST TRACK 

gLAST WORD COURT 

SLAST DATA PATTERR USED 

JBUPFER ALLOCATED 

sRETRY COUNT 

SREREAD STATUS 

SDRIVE STATUS FLACS 

JWUMBER OF ORDERS 

SRUPBER OF WORDS WRITTER 

SRUMBER OF WORDS PEAD 

sWUMBER CP SCFT ERRORS (REREAD CCRRECTABLE) 
SHUMBER OF SOFT ERRORS (OFFSET CORRECTAPLE ) 
SPUMBER OF SOPT ERRORS (ECC CORRECTABLE) 
sHOMBER CF RARD DATA ERRORS 


| SNUMBER OF SEEK INCOMPLETES 


SNUMBER OF MISPOSITIONING ERRORS 

SRUMBER OF ALL CTHER ERRORS 

ZASSIGHMENT CCHMABD SEQUENCE 

sSEEK TO PREVIOUS COMMAND FLAC 

JERROR STATUS IRFCRPATION 

SREADER ADDRESS CF FIRST WISCOMPARE ERROR 


ZOFFSET ADDRESS FROP HEADER ADORESS 
sCOMPARTSON LEBCTR 

SBUFFER COMPAPISCR LENGTH 

SDRIVE SERIAL BUMPEF 

sCARIAGE SERIAL NUMBER 

SFIRST EXCLUSION AREA 

dSECCND EXCLUSION AREA 

STHIED EXCLUSICH AREA 

sFOURTH EXCLUSION AREA 

sFIPTAH EXCLUSION AREA 


BS 
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1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 
14862 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 
1492 
1493 
1494 
1495 
1496 
1497 
1498 
1499 
1500 
1501 
1502 
1503 
1504 
1505 


003500 
003501 
003502 
003504 
003505 
003506 
003507 
003510 
003512 
003514 
003516 
003520 
003522 
003524 
003526 
003530 
003532 
003534 
003536 
003540 
003542 
063544 
003546 
003550 
003552 
003554 
003556 
003560 
003562 
003564 
003566 
003570 
003572 
003573 
003574 
003575 
003576 
003577 
003600 
003602 
003604 
003606 
003612 
003616 
003617 
003620 
003621 
003622 
003623 
003624 
003626 
003627 
003630 


11-AUG-76 00:00 


000 
000012 
000005 
000005 
177770 
177770 


177777 
177777 


-SB8TTL 
PARMS: 
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PARAMETER BLOCK FOR DRIVE 4 


PARAMETER BLOCK FCR DPIVE 5 


e®YTE 
BYTE 
eWOPD 


VUUrFeownonmonhacococoocoeccocoococoococececeococeococoow 


177770,177777 
177770,177777 


oooocococoocoo 


sORTVE 5S 

sCOMMARD 

sCYLINDER ADDRESS 

sSECTOR ADDRESS 

STRACK ADDRESS 

sOFPSET VALUE 

38US ADDRESS (BITS 16 AWD 17) 
g8US ADDRESS (BITS 0 - 15) 

SWORE COURT (2°S CCPPLEWERT) 
SPROGRAW DRIVE STITUS INFORMATION 
SCOPHAND AND STATUS REGISTER 1 
SCOMMAND ABD STATUS REGISTER 2 
sWGRE COURT KECISTEF 

3BUS ADDRESS PECISTER 

SDESIRED TRACK ABD SECTOR RECISTEF 
SDESIRED CYLINDER RECTSTER 
SATTENTICH SUPHABY/CEPSET RECTSTES 
sERROR RECISTER 

SSTATUS REGISTER 

SMESSAGE LIFE A STATUS BYTE 00 
SMESSAGE LIBE B STATUS BYTE 00 
SMESSAGCE LIWE A STATUS BYTE 01 
SMESSAGE LIFE 8 STATUS BYTE 01 
SMESSAGE LIBE A STATUS BYTE 10 
sMESSAGCE LIWE B STATUS BYTE 10 
SMESSAGE LIWE A STATUS BYTE 11 
SMESSAGE LIBE B STATUS PYTE 11 
3ECC POSITION IRPFCRYATICH 

SECC PATTERN INPORMATION 

sQUEUE LIK 

SPINIMOP CYLIRCES 

SMAZIMUM CYLIBCES 

SPINIMUM TRACK 

SMAXIWUM TRACK 

SPIWNIMUM SECTCE 

sMAXINUM SECTOR 

JREAD/WRITE RATIO 

JAUTCMATIC WRITE CHECK 
SCGREECTABLE FEAD ERROR THRESHCLE 


SUNCORRECTABLE REID ERROR THRESHCLD 


dSEEK ERROR THRESHOLD 


SPAXIMNUM RUPBER CF COMMABDS TO DRIVE 
sPAXIMUM BOMBER CF WORDS TRANSFERFECD TO CEIVE 


SSAMPLE COMPARE FLAG 

gFCC COMPARE PFLAG 

STMHIRIT ERPCR CCRRKECTICKH 

sDATA PATTERN USED 

sCURRENT CEWERATED DATA PATTERS 


SCUPRRERT RARDCPLY GENERATED CONPARC 
SCURGENT PANDCHLY GENERATED CYLTATER 


SCUPRENT PANDOMLY GENERATED SECTCE 
SCURGEUT RARDOMLY GENERATED TRACK 


SCURKENT RAWCCHLY GENERATED WCRD CCUNT 


Cs 











_ @ @ «|! 
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— 
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1506 
1507 
1508 
1509 
1510 
1511 
1512 
1513 
1514 
1515 
1516 
1517 
1518 
1519 
1520 
1521 
1522 
1523 
1524 
1525 
1526 
1527 
1528 
1529 
1530 
1531 
1532 
1533 
1534 
1535 
1536 
1537 
1538 
1539 
1540 
1541 
1542 


003632 
003634 
003635 
003636 
003640 
003641 
003642 
003644 
003645 
003646 
003647 
003650 
003652 
003656 
003664 
003672 
003674 
003676 
003700 
003702 
003704 
003706 
003710 
003711 
003712 
003714 
003716 
003717 
003720 
003722 
003724 
003726 
003732 
003736 
003742 
003746 
003752 


11-AUG-76 00:00 


000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 

000 
000000 
000000 

000 

000 
000000 
000000 
007777 
000000 
000000 
000000 
000000 
000000 
000000 


000000 
000000 
000000 
000000 
000000 
000000 


PARAMETER BLOCK 


WORD 
BYTE 


MACY11 30(1046) O1-DEC-77 14315 PAGE 34 


FOR DRIVE 5 


SeSeeeeseossee 


oo 
s 8 
oco 
i) 
oo 


SCUPKGEBT PARDOMLY GENERATED BUS ACDRESS 


LAST COMMAND 

sLAST CYLINDER 

sLAST SECTOP 

LAST TRACK 

sLAST wORD COURT 

sLAST DATA PATTEGR USED 

sBUPFER ALLOCATED 

sRETRY COUNT 

PREREAD STATUS 

SDRTVE STATUS FLACS 

SRUMBER OF CROERS 

sHUMBER OF WORDS WRITTER 

aPOPBER OF WORDS READ 

sHOPBER CP SCPT EBRCRS (BEREAD COCHRECTARLE) 
SHUMBER OF SOFT ERRORS (OFFSET CORRECTAPLE ) 
SHUMBER CF SOPT EPRCRS (ECC CORRECTABLE) 
SHOMBER CP HARD DATA ERPCRS 

SHUMBER OF SEEK INCOMPLETES 

SRUMBER OF MISPOSITIONING ERRORS 

SRWUMBER OF ALL OTRER ERRORS 

ZOSSICHMERT CCHPARD SEQUERCE 

sSEEK TO PREVIOUS CCHWARD FLAG 

JERROR STATUS INFCRPATION 

SHEADER ADDRESS GP FIRST MISCOMPAPE ERRCH 


JOFFSET ADDRESS FRO HEADER ADDRESS 
sCOMPARTSON LENCTR 

SBUFFER COMPARISON LENGTH 

SDRTVE SERIAL BUMPER 

SCARIAGE SERIAL BUMBER 

dFIRST EXCLUSION AREA 

SSECCRD EXCLUSION AREA 

sTHIED EXCLUSICH AREA 

sPOURTH EXCLUSICH APEA 

sPIFTH PXCLUSTION AREA 





DF 
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1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
i551 
1552 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1573 
1574 
1575 
1576 
1577 
1578 
1579 
1580 
1561 
1562 
1583 
1564 
1585 
1586 
1587 
1588 
1589 
1590 
1591 
1592 
1593 
1594 
1595 
1596 
1597 
1598 


003756 
003757 
003760 
003762 
003763 
003764 
003765 
003766 
003770 


003772 | 


003774 
003776 
004000 
004002 
004004 
004006 
004010 
004012 
004014 
004016 
004020 
004022 
004024 
004026 
004030 
004032 
004034 
004036 
004040 
00404? 
004044 
004046 
004050 
004051 
004052 
004053 
004054 
004055 
004056 
004060 
004062 
004064 
004070 
004074 
004075 
004076 
004077 
004100 
004101 
004102 
004104 
004105 
004106 


11-AUG-76 00:00 


006 

000 
000000 

000 

000 

000 

000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000632 

000 

00? 

000 

025 

003 

000 
000012 
000005 
000005 
177770 
177770 

000 


177777 
177777 


eSBTTL 
PARM6$ 


MACY11 30(1046) O1-DEC-77 14215 PAGE 35 
PARAMETER BLOCK FOR DRIVE 5 


PARAMETER BLOCK FCR DRIVE 6 


BYTE 
BYTE 
WORD 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
WORD 
-WOPD 
WORD 
eWORD 
WORD 
eWOPRD 
WORD 
WORD 
eWORD 
WORD 
WORD 
e WORD 
WORD 
WORD 
-WOrRD 
WORD 
e WORD 
WORD 
@WOPD 
eWOPD 
WORD 
WORD 
WORD 
eWORD 
BYTE 
BYTE 
ePYTE 
BYTE 
BYTE 
BYTE 
eWOPRD 
WORD 
-VORD 
WORD 
eWCRD 
BYTE 
BYTE 
oPYTE 
BYTE 
BYTE 
BYTE 
WCRD 
BYTE 
BYTE 
WORD 


UNrownoncewocoococococccocoococccoocooccocooocococoecoa 


177770,177777 
177770,177777 


sORTVE 6 

sCOPHAND 

sCYLIRDER ADDRESS 

sSECTOR ADDRESS 

STRACK ADDRESS 

ZOFFSET VALUE 

3BUS ADDRESS (BITS 16 AND 17) 
g8US ADDRESS (BITS 0 - 15) 

gUGRO COURT (2°S CCPPLEPENT) 
sPROGRAP DRIVE STATUS IBFCRP ATION 
SCOMMAND AND STATUS KEGISTER 1 
SCOMMABD AND STATUS REGISTER 2 
sWCRO COURT KECISTEF 

JBUS ADDRESS REGISTER 

SDESIRED TRACK AKD SECTOR REGISTER 
SDESIPED CYLINDER RECISTER 
SATTENTION SUPHALY/CEPSET GECISTES 
JERROR RECISTER 

SSTATUS REGISTER 

SMESSAGE LIWE A STATUS BYTE 00 
SMESSAGP LIBWE B STATUS BYTE 00 
sMESSAGE LIBRE A STATUS BYTE O1 
SMESSAGE LIFE B STATUS BYTE 01 
SMESSAGCE LIRE A STATUS BYTE 10 
SMESSAGE LINE 8 STATUS BYTE 10 
SMESSAGE LIWE A STATUS BYTE 11 
sMESSAGE LIVE 8 STATUS BYTE 11 
3ECC POSITICN INFCRPATICEH 

JdECC PATTERN TRPORMATION 

JOUEUE LIWK 

SMINIMUM CYLIRCES 

sPAXIMUM CYLIBCESR 

sPINIVUY TRACK 

S¥MAXIPUP TRACE 

SMINIMOM SECTCE 

sPAXIMUW SECTCR 

SREAD/URITE &ATIC 

ZAUTCWATIC WRITE CHECK 
SCCPRRECTAPLE FEAC ERRCR THRESACLE 


SUNCOPRRECTAPLE PEAD ERROR THRESHCLE 


sSEPK ERROR TRRESPCLD 


S¥AXIMOM HUMBER CF COMMANDS TO DATIVE 
SMAXIMUM RUPBFR CP WORDS TRANSFERRED TO CEIVE 


SSAMPLE COMPARE FLAC 

3ECC COMPARE FLAG 

STRHIBIT FRECR CCRRECTICA 

sDATA PATTEPN USET 

SCURRFUT CENERATED CATA PATTERN 


SCURRENT RABDCHLY GENERATED CONPARD 
SCURBFAT RANCCRLY GERERATED CYLTBCEF 


SCURKENT PANDCNLY GENERATED SECTCE 
SCURKFUT RANDOMLY GENERATED TRACK 


SCURRFENT RARDCHLY GENERATED WORD CCUNT 


SEG 00¢7 


ES 





lan a & & & & & 2a & &Ae Lae ———— 








1599 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1608 
1609 
1610 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
162" 
1629 
1630 
1631 
1632 
1633 
1634 
1635 


DZR6PP.P11 


004110 
004112 
004113 
004114 
004116 
004117 
004120 
004122 
004123 
004124 
004125 
004126 
004130 
004134 
004142 
004150 
004152 
004154 
004156 
004160 
004162 
004164 
004166 
004167 
004170 
004172 
004174 
004175 
004176 
004200 
004202 
004204 
004210 
004214 
004220 
004224 
£04230 


RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-B8 
11-AUG-76 00:00 


PARAMETER BLOCK 


@WGRD 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
WORD 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
WORD 
WORD 
e WORD 
WORD 
eWCRD 
WORD 


MACY11 30(1046) O1-DEC-77 14315 PAGE 36 
FOR DRIVE 6 


SCURGENT PANCCHLY GFRERATEC BUS ACDPESS 


sLAST COMMARD 

LAST CYLTAOER 

sLast Sector 

dLAST TRACK 

SLAST WORD COUNT 

SLAST DATA PATTERR USED 

SBOFFER ALLCCATEC 

sRETRY COURT 

SREREAD STATUS 

sORTVE STATUS FLACS 

sWOMBER Cr CKDERS 

SROMBER OF WORDS WRITTEN 

SRUMBER OF WORDS READ 

SHUMBER OCF SCPT ERRCKS (REREAD CCRRECTAPLE) 
suUMBER CF SOFT EPRORS COPFSET CCERECTABLE) 
SWUMBER OF SOPT ERRORS (ECC CORRECTABLE) 
SRUMBER CF AARD OATA ERRORS 

auUPBFR CF SEEK ISCCHPLETES 

SHUMBER OF PISPOSITIONING ERRORS 

SUUMBER OF ALL OTRER ERRORS 

JASSICHPERT COMMARD SEQUERCE 

sSEFR TO PREVICUS CCHHABD FLAC 

JERROR STATUS IRFCRPATION 

SREADER ADDRESS OF FIRST MISCOMPABE ERRCE 


sOPPSFT ADOPESS FECY HEADER ADDRESS 
sCOMPARTSON LEBCTP 

SBUFFER COMPARISCR LENGTH 

PORTVE SERIAL BOMBER 

SCARIAGE SEPIAL BUMPER 

SPIRST EXCLUSION PREA 

SSECOGRO EXCLUSION AREA 

STHIGD EXCLUSION AREA 

SPOUGTH EXCLUSION AFEA 

dPIFTA EXCLUSION AREA 


Ps 
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1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
1667 
1668 
1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1683 
1684 
1685 
1686 
1687 
1668 
1689 
1690 
1691 


004234 
004235 
004236 
004240 
004241 
004242 
004243 
004244 
004246 
004250 
004252 
004254 
004256 
004260 
004262 
004264 
004266 
004270 
004272 
004274 
004276 
004300 
004302 
004304 
004306 
004310 
004312 
004314 
004316 
004320 
004322 
004324 
004326 
004327 
004330 
004331 
004332 
004333 
004334 
004336 
004340 
004342 
004346 
004352 
004353 
004354 
004355 
004356 
004357 
004360 
004362 
004363 
004364 


11-AUG-76 00:00 


000012 
000005 
000005 
177770 
177770 
000 
000 
000 
000 
000 
000 
000000 
000 
000 
000000 


177777 
177777 


¢ SBTTL 
PARW7: 


MACY11 30(1046) 01-CEC-77 14:15 PACE 37 
PARAMETER BLOCK FOR DRIVE 6 


PARAMETER BLOCK FCR DRIVE 7 


oPYTE 
BYTE 
WORD 
BYTE 
oPYTE 
BYTE 
BYTE 
WORD 
WORD 
WORD 
WORD 
eWORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
-WOPD 
WORD 
WORD 
WORD 
WORD 
WORD 
e WORD 
WORD 
WORD 
WORD 
eWORD 
WORD 
WORD 
WORD 
BYTE 
BYTE 
BYTE 
oPYTE 
BYTE 
BYTE 
WORD 
WORD 
WORD 
- WORD 
WORD 
BYTE 
BYTE 
BYTE 
ePYTE 
BYTE 
BYTE 
«WORD 
ePYTE 
BYTE 
WORD 


YMrwROoWNONOAOCOCCcCcCcCcoccecoeocooooooococoeoocooococo~) 


177770,177777 
177770,177777 


sORIVE 7 

aCOPRARD 

SCYLIWOEG ADDRESS 

sSECTOR ADDRESS 

sTRACK ADDRESS 

sOFPSET VALUE 

g8US ADDRESS (BITS 16 AND 17) 
38US ADDRESS (BITS 0 - 15) 

SWORD COURT (2°S COPPLEPERT) 
SPROGRAM CARIVE STATUS INFORMATICS 
sCOMMAND ABD STATUS REGISTER 1 
SCOMMAND ABD STATUS REGISTER 2 
SWORD COUNT RECTSTEP 

gPUS ADDRESS RECISTER 

SDESIRED TRACK ABD SECTOR REGISTES 
SDESIRED CYLINDER RECISTER 
JATTENTION SUPHARY/OFPSET REGISTER 
SERRCR RECISTES 

SSTATUS REGISTER 

SMESSAGE LIRE A STATUS BYTE 00 
SPESSAGE LINE B STATUS BYTE 00 
SMESSAGCE LIBRE A STATUS BYTE 01 
SMESSAGE LIWE 8 STATUS BYTE 01 
SMESSAGE LIWE A STATUS BYTE 10 
sMESSAGE LIWE B STATUS BYTE 10 
SMESSAGE LIWE A STATUS BYTE 11 
SPESSAGE LIWE B STATUS BYTE 11 
sECC PCSITICH IBFCRYATICH 

JECC PATTERN INFORMATION 

sQUEUE LIMK 

SPIWIMUM CYLIBDER 

SMAZIMUM CYLIBCES 

sVIWINOM TRACE 

sPAXIMUM TRACK 

gMINIMUM SECTCR 

SPAXIMUM SECTCE 

SPEAD/URITE RATIO 

SAUTOMATIC WRITE CHECK 
SCORRECTABLE PEAD ERROR THRESROLC 


SUBCCREECTAPLE PEAD ERRCR THRESACLE 


sSEEK ERROR THRESFOLD 


SPAXIMUM RUPBER CP COMMANDS TO DRIVE 
SPAXIPUM BUPBEG CF WORDS TRANSFESEED TC CEIVE 


SSAMPLE COMPARE FLAG 

dECC COMPARE FLAG 

STMRIBIT ERRCR CCRRECTICK 

SDATA PATTEPA USEC 

SCURRENT GEWERATEC CATA PATTERN 


SCURKENT RANDOMLY GENERATED COMPARD 
SCURRENT RAROCHLY GENERATED CYLIBCER 


SCURSERT RANCCHLY GEMERATEC SECTCE 
SCURRENT RANCCHLY GENERATED TRACK 


SCURKENT RANCCHLY GENERATED wORD COUNT 


s£0 0059 


Cs 





a. a a a a a a a a a a a a Mm 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30€1046) O1-CEC-77 14315 PACE 38 
@iy Ozk6e8.P11 11-AUG-76 00:00 PARAMETER BLOCK FOR DRIVE 7 SEC 000 
1692 004366 000000 eworD 0 SCURKENT RANDOMLY GENERATED BUS ADDRESS 
€ 1693 004370 000 BYTE 0 
1694 004371 000 eBYTE 0 sLAST COMMAND 
1695 004372 000000 eWORD 0 dLAST CYLINDER 
q 1696 004374 000 eBYTE 0 gLAST SECTOR 
1697 004375 000 eBYTE 0 sLAST TRACK 
1698 004376 000000 ewoRD 0 sLaST WORD COURT 
f 1699 004400 000 BYTE 0 SLAST DATA PATTER USED 
1700 004401 000 -BYTE 0 sBUFFER ALLOCATED 
1701 004402 000 eBYTE 0 sPETEY COUNT 
c 1702 004403 000 -BYTE 0 JREREAD STATUS 
1703 004404 000000 ewORD 0 sDRIVE STATUS FLACS 
1704 004406 000000 000000 eWORD 0,0 SRUMBER OF ORDERS 
® 1705 004412 000000 000000 000000 eWORD 07070 SROMBER CP WORDS WRITTER 
1706 004420 000000 000000 000000 eWORD 0,0,0 SROMBER OF WORDS FPEAD 
1707 004426 000000 WORD 0 SUUMBER OF SOFT ERRORS (REREAD CORRECTAPLE ) 
€ 1708 004430 000000 ewORD 0 snUnBeR GP SCRT ERRORS (OPFSET CCHRECTAPLE) 
1709 004432 000000 -woRD 0 SUUMBER CF SCFT ERRORS (ECC CORRECTABLE) 
1710 004434 000000 eWORD 0 SROMBER OF HARD DATA ERRORS 
€ 1711 004436 000000 ewoRD 0 SRUMBER OF SEEK IRCONPLETES 
1712 004440 000000 eWORD 0 SHUMBER CF MISPOSITIOCNING EkaCRS 
1713 004442 000000 ewoRD 0 SRUMBER OF ALL CTRER ERRORS 
e 1714 004444 000 eBYTE 0 JASSICHMERT COMNMARD SEQUENCE 
1715 004445 000 BYTE 0 SSEEK TO PREVICUS COMMABD FLAC 
1716 004446 000000 eWORD Q SERRCR STATUS INPCRPATICH 
C 1717 004450 000000 WORD 0 SPEADER ADDRESS OF FIRST MISCONPARE ERRCE 
1718 004452 000 eBYTE 0 
1719 004453 000 -BYTE 0 JSOFFSET ADDRESS FROP HEADER ADDRESS 
€ 1720 004454 000000 eWORD 0 SCOMPARTSOS Leacte 
1721 004456 000000 -WORD 0 sBUFFER COMPARISOH LENCTE 
1722 004460 007777 eWORD 007777 SDRIVE SERIAL BUMPER 
C 1723 004462 000000 000000 eWORD 0,0 SCARIAGE SERIAL BURPER 
1724 004466 000000 000000 eWORD 0,0 SPIRST EXCLUSION AREA 
1725 004472 000000 000000 eWORD 0,0 SSECORD EXCLUSION AREA 
c 1726 004476 000000 000000 eWORD 0,0 STHIRD EXCLUSION AREA 
1727 004502 000000 000000 eWORD 0,0 SPOURTH EXCLUSIOB AREA 
e 1728 004506 000000 000000 eWCPD 0,0 SPIPTA EXCLUSION AREA 
e 
© 
© 
© 
6 
€ 
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DZR6PB.P11 11-AUG-76 00:00 “-- RETRY PARAMETER BLOCK --- ' S8¢@ 006) 
33 eSBTTL <--- RETRY PARAMETER BLOCK --- 
1730 
1731 eSBTTL PARAMETER BLOCK 10 FOR DRIVE 
1732 
1733 004512 000 PARM10: .BYTE 0 sDRTVE BUPBER 
1734 004513 000 eBYTE 0 aCOMMARD 
1735 004514 000000 eWORD 0 sCYLIBWDER ADCRESS 
1736 004516 000 -BYTE 0 SSECTOR ADDRESS 
1737 004517 000 eBYTE 0 sTRACK ADDRESS 
1738 004520 000 eBYTE 0 JOFPSET VALUE 
1739 004521 000 eBYTE 0 BUS ADDEESS (BITS 16 ABD 17) 
1740 004522 000000 WORD 0 38US ADDRESS (BITS 0 - 15) 
1741 004524 000000 ewORD 0 SWORD COURT (2°S COMPLEMENT) 
1742 004526 000000 eWORD 0 SPROGCRAW ORIVE STATUS IHFORPATICA 
1743 004530 000000 word 0 SCOMMABD AND STATUS REGISTER 1 
1744 004532 000000 WORD 0 SCOMMAND AUD STATUS REGISTER 2 
1745 004534 000000 eworD 0 SWORD COURT REGISTER 
1746 004536 000000 eWORD 0 sOUS ADDHESS RECISTESR 
1747 004540 000000 eWORD 0 SDESIRED TRACK ABC SECTOR RECISTES 
1748 004542 000000 WORD 0 SDESIRED CYLINDER REGISTER 
1749 004544 000000 eworD 0 ZATTENTION SUPHARY/OFFSET REGISTER 
1750 004546 000000 eWORD 0 SERRCR RECISTER 
1751 004550 000000 eWOPD 0 SSTATOS REGISTER 
1752 004552 000000 eWORD 0 SPESSAGE LIWE A STATUS BYTE 00 
1753 004554 000000 eworD 0 SMESSAGE LIBE B STATUS BYTE 00 
1754 004556 000000 eWORD 6 SMESSAGE LIRE A STATUS BYTE 01 
1755 004560 000000 WORD 0 SMESSAGE LIBRE B STATUS BYTE 01 
1756 004562 000000 eworD 0 SMESSAGE LIBRE A STATUS BYTE 10 
1757 004564 000000 eWORD 0 SMESSAGE LIBE B STATUS BYTE 10 
1758 004566 000000 WORD 0 SMESSAGE LIFE A STATUS BYTE 11 
1759 004570 000000 eworD 0 SMESSAGE LIWE B STATUS BYTE 11 
1760 004572 000000 eWOPD @ JECC PCSITICH IRFCRPATION 
1761 004574 000000 eworD 0 3ECC PATTERN INFORMATION 








| « 


© 
RKG1I/RKOG PERFORMAWCE EXERCISER MAINDEC DZR6P-8 MACY11 30€1046) O1-CEC-77 14:15 PAGE 40 
DZR6PB.P11 Tt -AUG-76 00300 DATA PATTERNS AND DATA PATTERN TABLE SEQ 00€2 
pet eSBTTL DATA PATTERNS AND DATA PATTERN TABLE 
1 
1764 004576 004636 PATTAB: PATO 
1765 004690 004736 PAT1 
: 1766 004602 005036 PAT2 
1767 004604 005136 PAT3 
1768 004606 005236 PaT4 
1769 004610 005336 PATS 
1770 004612 005436 PAT6 
1771 004614 005536 PAT? 
1772 004616 005636 PAT10 
1773 004620 005736 PAT11 
1774 004622 006036 PAT12 
1775 004624 006136 PaT13 
1776 004626 006236 PAT14 
1777 004630 006336 PAT1S 
1778 004632 006436 PAT16 
1779 004634 006536 PAT17 
1780 
1781 004636 165555 PATO: .WORD 165555 
1782 004640 133333 eWORD 133333 
1783 004642 165555 eWORD 165555 
1784 004644 133333 eWORD 133333 
1785 004646 165555 eWORD 165555 
17866 004650 133333 eWORD 133333 
1787 004652 165555 eWORD 165555 
1786 004654 133333 eWORD 133333 
1789 004656 165555 ewOR” 165555 
1790 004660 133333 eWORD 133333 
1791 004662 165555 eWORD 165555 
1792 004664 133333 eWORD 133333 
1793 004666 165555 eWORD 165555 
1794 004670 133333 eWORD 133333 
1795 004672 165555 eWORD 165555 
1796 004674 133333 eWORD 133333 
1797 004676 165555 eVORD 165555 
1798 004700 133332 eWORD 133333 
1799 004702 165555 eWORD 165555 
1800 004704 133333 eWORD 133333 
1801 004706 165555 eWORD 165555 
1802 004710 133333 eWORD 133333 
1803 004712 165555 eWORD 165555 
1804 004714 133333 eWORD 133333 
1805 004716 165555 eWORD 165555 
1806 004720 133333 eWORD 133333 
1807 004722 165555 eWORD 165555 
1808 004724 133333 eWORD 133333 
1809 004726 165555 eWOPD 165555 
1810 004730 133333 eWOPD 133333 
1811 004732 165555 eWORD 165555 
18612 004734 133333 eWORD 133333 
1813 
1814 004736 026455 PATI: eWORD 026455 
1815 004740 151322 eWCRD 161322 
1816 004742 026455 . eWORD 026455 
1917 004744 026455 eWORD 026455 


i 
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1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1826 
1829 
1830 
1831 
1832 
1833 
1834 
18635 
1836 
1837 
1838 
1839 
1840 
1841 
1842 
18643 
18644 
1845 
18646 
1847 
1648 
1849 
1850 
1851 
1852 
1853 
18654 
1855 
1856 
1857 
18658 
1859 
1860 
1861 
1862 
1863 
1864 
1865 
1666 
1867 
1868 
1869 
1870 
1871 
1872 
1873 


— — —ñ— — — — — 


004746 
004750 
004752 
004754 
004756 
004760 
004762 
004764 
004766 
004770 
004772 
004774 
004776 
005000 
005002 
005004 
005006 
005010 
005012 
005014 
005016 
005020 
005022 
005024 
005026 
005030 
005032 
005034 


005036 
005040 
005042 
005044 
005046 
005050 
005052 
005054 
005056 
00!:060 
00£062 
005064 
005066 
005070 
005072 
005074 
005076 
005100 
005102 
005104 
005106 
005110 
005112 
005114 
005116 
005120 
005122 


11-AUG-76 00:00 


151322 
151322 
026455 
026455 
026455 
151322 
151322 
151322 
026455 
026455 
026455 
026455 
151322 
151322 
151322 
151322 
026455 
026455 
026455 
151322 
151322 
151322 
026455 
026455 
151322 
151322 
026455 
151322 


007417 
170360 
007417 
007417 
170360 
170360 
007417 
007417 
007417 
170360 
170360 
170360 
007417 
007417 
007417 
007417 
170360 
170360 
170360 
170360 
007417 
007417 
007417 
170360 
170360 
170360 
007417 
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DATA PATTERWS AND DATA PATTERN TABLE 


PAT2: 


151322 
151322 
026455 
026455 
026455 
151322 
151322 
151322 
026455 
026455 
026455 
026455 
151322 
151322 
151322 
151322 
026455 
026455 
026455 
151322 
151222 
151322 
026455 
026455 
151322 
151322 
026455 
151322 


- 007417 


170360 
007417 
007417 
170360 
170360 
007417 
007417 
007417 
170360 
170360 
170360 
007417 
007417 
007417 
007417 
170360 
170360 
170360 
170360 
007417 
007417 
007417 
170360 
170360 
170360 
007417 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-P 


OZR6PB.P11 


1674 
1875 
1676 
1877 
1878 
1679 
1880 
1681 
188? 
1863 


005124 
005126 
005130 
005132 
005134 


005136 
005140 
005142 
005144 
005146 
005150 
005152 
005154 
005156 
005160 
005162 
005164 
005166 
005170 
005172 
005174 
005176 
005200 
005202 
005204 
005206 
005210 
005212 
005214 
005216 
005220 
005222 
005224 
005226 
005230 
005232 
005234 


005236 
005240 
005242 
005244 
005246 
005250 
005252 
005254 
005256 
005260 
005262 
005264 
005266 
005270 
005272 
005274 
005276 


11-AaUG-76 00:00 


007417 
170360 
170360 
007417 
170360 


052525 
125252 
052525 
052525 


WACY11 30€1046) O1-DEC-77 14315 PAGE 42 


DATA PATTERNS AND DATA PATTERN TABLE 


PAT33 


PAT4: 


WORD 
eWCRD 
eWOPD 
eWORD 
WORD 


WORD 
eWORD 
e WORD 
WORD 
WORD 
WORD 
eWORD 
eWCRD 
WORD 
eWORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
e WORD 
eWORD 
WORD 
WORD 
- WORD 
eWCRD 
WORD 
WORD 
eWOPD 
eWCRD 
WOPD 
WORD 
e WORD 
@WCRD 


007417 
170360 
170360 
007417 
170360 


052525 
125252 
052525 
052525 
125252 
125252 
052525 
052525 
052525 
125252 
125252 
125252 
052525 
052525 
052525 
052525 
125252 
125252 
12525? 
125252 
052525 
052525 
052525 
125252 
125252 
125252 
052525 
052525 
125252 
125252 
052525 
125252 


000000 
010421 
021042 
031463 
042104 
052525 
063146 
073567 
104210 
114631 
125252 
135673 
146314 
156735 
167356 
177777 
177777 


45 


@ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ 


) @ @ 


= 





RKOI1/RKOG6 PERFORMANCE EXERCISER MATNDEC DZRG6P-F MACY11 30€1046) O1-CEC-77 14815 PACE 43 
OZREPB.P11 11-AUG-76 00:00 DATA PATTERNS AND DATA PATTERN TABLE SEG O0€S 

1930 005300 167356 eWORD 167356 
1931 005302 156735 eWORD 156735 
1932 005304 146314 WORD 146314 
1933 005306 135673 eWORD 135673 
1934 005310 1252752 eWORD 125252 
1935 005312 114631 eWORD 114631 
1936 005314 104210 eWORD 104210 
1937 005316 073567 eWORD 073567 
1938 005320 063146 eWORD 063146 
1939 005322 052525 eWORD 052525 
1940 005324 042104 eWORD 042104 
1941 005326 031463 eWORD 031463 
1942 005330 021042 eWORD 021042 
1943 005332 010421 eWORD 010421 
1944 005334 000000 WORD 000000 
1945 

1946 005336 000000 PATS: .WORD 000000 
1947 005340 177777 eWORD = 177777 
1948 005342 000000 e¥WORD 000000 
1949 005344 000000 eWORD 000000 
1950 005346 177777 eWORD 38 177777 
1951 005350 1977777 eWORD = 177777 
1952 005352 000000 eWORPD 000000 
1953 005354 000000 eWORD 000000 
1954 005356 000000 eWORD 000000 
1955 005360 1977777 eWORD) 177777 
1956 005362 177777 eWORD 177777 
1957 005364 1977777 eWORD = 177777 
1958 005366 000000 eWORD 000000 
1959 005370 000000 eWORD 000000 
1960 005372 000000 eWORD 000000 
1961 005374 000000 eWORD 000000 
1962 005376 177777 eWOPD 177777 
1963 005400 177777 eWORD = 177777 
1964 005402 177777 eWORD 177777 
1965 005404 1977777 eWORD 177777 
1966 005406 000000 eWORD 000000 
1967 005410 000000 eWORD 000000 
1968 005412 000000 eWORD 000000 
1969 005414 177777 eWORD = 177777 
1970 005416 177777 eWORD 177777 
1971 005420 1977777 eWORD 1977777 
1972 005422 000000 eWORD 000000 
1973 005424 000000 eWORD 000000 
1974 005426 177777 eWORD 177777 
1975 005430 1977777 eWORD) 177777 
1976 005432 000000 eWORD 000000 
1977 005434 1977777 eWORD 177777 
1978 

1979 005436 000001 PAT6: e¥WCRD 000001 
1980 005440 000003 WORD 000003 
1981 005442 000007 eWORD 000007 
1982 005444 000017 eWORD 000017 
1983 005446 000037 eWORD 000037 
1984 005450 000077 eWORD 000077 
1985 005452 000177 eWORD 000177 





RK611/RK06 PERFORMANCE EXERCISER “AINDEC DZR6P-P 


DZK6PR.P11 


1986 
1987 
1968 
198° 
1990 
1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2003 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 
2020 
2021 
202? 
2023 
2024 
2025 
2026 
2027 
2028 
2029 
2030 
2031 
2032 
2033 
2034 
2035 
2036 
2037 
2038 
2039 
2040 
2041 































005454 
005456 
005460 
005462 
005464 
005466 
005470 
005472 
005474 
005476 
005500 
005502 
005504 
005506 
005510 
005512 
005514 
005516 
005520 
005522 
005524 
005526 
005530 
005532 
005534 


005536 
005540 
005542 
005544 
005546 
005550 
00555? 
005554 
005556 
005560 
005562 
005564 
005566 
005570 
005572 
005574 
005576 
005600 
005602 
005604 
005606 
005610 
00561? 
005614 
005616 
005620 
005622 
005624 
005626 
005630 


11-AUG-76 00:00 


000377 
000777 
001777 
003777 
007777 
017777 
037777 
077777 
177777 
177776 
177774 
177770 
177760 
177740 
177700 
177600 
177400 
177000 
176000 
174000 
170000 
160000 
140000 
100000 
000000 


000001 
000002 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 
100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 


MACY11 30€1046) O1-CFC-77 14:15 FACE 44 


DATA PATTERNS AND DATA PATTERN TABLF 


PAT7: 


WORD 
e WORD 
-WORD 
-WORD 
e WORD 
eWCRD 
WORD 
eWORD 
e WORD 
eWCPD 
WORD 
eWORD 
«WORD 
WORD 
WORD 
-WORD 
- WORD 
@WCRD 
-WOPRD 
eWoRD 
-WOPD 
eWCRD 
WORD 
WORD 
e WORD 


-WOrRD 
WORD 
eWOPD 
-WCPD 
-WOPD 
eWOPD 
eWOPD 
WORD 
WORD 
WORD 
- WORD 
eWCFD 
e WORD 
eWORD 
e WORD 
eWOPRD 
eWORD 
eWORD 
e WORD 
e WORD 
eWOPD 
eWORD 
eWORD 
e WORD 
WORD 
WORD 
e WORD 
eWCPD 
WORD 
WORD 


000277 
000777 
001777 
003777 
007777 
617777 
037777 
077777 
177777 
177776 
177774 
177770 
177760 
177740 
177700 
177600 
177400 
177000 
176000 
174000 
i70000 
160000 
140000 
100000 
000000 


000001 
000002 
000004 
000010 
000020 
000040 
000100 
000200 
600400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 
106000 
040000 
020000 
010000 
604000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 


SEG 00€6 


Ao 














- @ 
RKG11/RK06 PERFORMANCE EXERCISER MATNDEC DZR6P-P MACY11 30(€1046) 01-CFC-77 14:15 PACE 45 
DZR6PB.P11 11-AUG-76 00:00 DATA PATTERWS AND DATA PATTERN TABLE SEG 00€7 @ 
2042 005637? 000002 WORD 000002 
2043 005634 000001 eWORD 000001 @ 
48 
2045 005636 177776 PATIO: .WORD 177776 
2046 005640 177775 WORD 177775 6 
2047 005642 177773 eWORD 177773 
2048 005644 177767 WORD 177767 
2049 005646 177757 WORD 177757 6 
2050 005650 177737 ewORD 177737 
2051 005652 177677 WORD 1477677 
2052 005654 177577 eWOPD 177577 € 
2053 005656 177377 . eWORD 177377 
2054 005660 176777 WORD 176777 
2055 005662 175777 WORD 175777 e 
2056 005664 173777 WORD 173777 
2057 005666 167777 WORD 167777 
2058 005670 157777 WORD 157777 € 
2059 005672 137777 WORD 137777 
2060 005674 077777 WORD 077777 
2061 005676 077777 «WORD 077777 e 
2062 005700 137777 WORD 137777 
2063 005702 157777 WORD 157777 
2064 005704 167777 eWORD 167777 € 
2065 005706 173777 WORD 173777 
2066 005710 175777 WORD 175777 
2067 005712 176777 eWOPD 176777 € 
2068 005714 177377 WORD 177377 
2069 005716 177577 eWORD 177577 
2070 005720 177677 WORD 177677 @ 
2071 005722 177737 WORD 177737 
2072 005724 177757 WORD 177757 
2073 005726 177767 WORD 177767 @ 
2074 005730 177773 WORD 177773 
2075 005732 177775 eWGRD 177 
2076 005734 177776 WORD 177776 € 
20 
2078 005736 172666 PAT11: .WORPD 172666 
2079 005740 155555 eWCPD 155555 @ 
2080 005742 172666 WORD 172666 
2081 005744 155555 WORD 155555 
2082 005746 172666 . eWORD 172666 e 
2083 005750 155555 WORD 155555 
2084 005752 172666 WORD 172666 
2085 005754 155555 eWORD 155555 @ 
2086 005756 172666 eWORD 172666 
2087 005760 155555 WORD 15555© 
2088 005762 172666 WORD 172666 @ 
2089 005764 155555 WORD 155555 
2090 005766 172666 WORD 172666 
2091 005770 155555 WORD 155555 € 
2092 005772 172666 «WORD 172666 
2093 005774 155555 eWORD 155555 
2094 005776 172666 WORD 172666 @ 
2095 006000 155555 eWORD 155555 
2096 006002 172666 WORD 172666 
2097 006004 155555 eWORD 155555 54 
@ 





REK611/REKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-P 


DZR6PB.P11 


2098 
2099 
2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
2108 
2109 
2110 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2134 
2135 
2136 
2137 
2138 
2139 
2140 
2141 
2142 
2143 
2144 
2145 
2146 
2147 
2148 
2149 
2150 
2151 
2152 
2153 


006006 
006010 
006012 
006014 
006016 
006020 
006022 
006024 
006026 
006030 
006032 
006034 


006036 
006040 
006042 
006044 
006046 
006050 
006052 
006054 
006056 
006060 
006062 
006064 
006066 
006070 
006072 
006074 
006076 
006100 
006102 
006104 
006106 
006110 
006112 
006114 
006116 
¥06120 
006122 
006124 
006126 
006130 
006132 
006134 


006136 
006140 
00614? 
006144 
006146 
006150 
006152 
006154 
006156 
006160 


11-AUG-76 00:00 


172666 
15555£ 
172666 
155555 
172666 
155555 
172666 
155555 
172666 
15555* 
172666 
155555 


153333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
1$3333 
066667 
153333 
066667 
1$3333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 


000000 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 


MACY11 30(1046) 


O1-CRC-77 14:15 PACE 46 


DATA PATTERNS AND DATA PATTERN TABLE 


PAT12: 


PAT13: 


172666 
155555 
172666 
155555 
172666 
155555 
172666 
155555 
172666 
15555* 
172666 
155555 


1$3333 
066667 
153333 
066667 
1£3333 
066667 
153333 
066667 
1£3333 
066667 
153333 
066667 
183333 
066667 
153333 
066667 
1$3333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 
163333 
066667 
153333 
066667 
153333 
066667 
153333 
066667 


000000 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 


C6 








RE611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PB.P11 


2154 
2155 
2156 
2157 
2158 
4159 
2160 
2161 
216? 
2163 
2164 
2165 
2166 
2167 
2168 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
21868 
2189 
2190 
2191 
2192 
2193 
2194 
2195 
2196 
2197 
2198 
2199 
2200 
2201 
2702 
2203 
2204 
2205 
2206 
2207 
2208 
2209 


006162 
006164 
006166 
006170 
006172 
006174 
006176 
006200 
006202 
006204 
006206 
006210 
006212 
006214 
006216 
006220 
006222 
006224 
006226 
006230 
006232 
006234 


006236 
006240 
006242 
006244 
006246 
006250 
006252 
006254 
006256 
006260 
006262 
006264 
006266 
006270 
006272 
006274 
006276 
006300 
006302 
006304 
006306 
006310 
006312 
006314 
006316 
006320 
006322 
006324 
006326 
006330 
006332 
006334 


11-AUG-76 00:00 


177777 


177777 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 





MACY11 30€1046) O1-CEC-77 14315 PACE 47 


DATA PATTERNS AWD DATA PATTERN TABLE 


PAT14: 


177777 
177777 
177777 
1779777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
179777 
177777 
1779777 
177777 


177777 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


De 











RK611/RKO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-8 


OZR6PB.P11 


2210 
2211 
2212 
2213 
2214 
2215 
2216 
2217 
2218 
2219 
2220 
2221 
2222 
2223 
2224 
2225 
2226 
2227 
2228 
2229 
2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
2238 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2248 
2249 
2250 
2251 
2252 
2253 
2254 
2255 
2256 
2257 
2758 
2259 
2260 
2261 
226? 
2263 
2264 
2265 


006336 
006340 
006342 
006344 
006346 
006350 
006352 
006354 
006356 
006360 
006362 
006364 
006366 
006370 
006372 
006374 
006376 
006400 
006402 
006404 
006406 
006410 
006412 
006414 
006416 
006420 
006422 
006424 
006426 
006430 
006432 
006434 


006436 
006440 
006442 
006444 
006446 
006450 
006452 
006454 
006456 
006460 
006462 
006464 
006466 
006470 
006472 
006474 
006476 
006500 
006502 
006504 
006506 
006510 
006512 


11-AUG-76 00:00 


172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 


070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 


WACY11 30€1046) O1-CEC-77 14315 PACE 48 


DATA PATTERNS AND DATA PATTERN TABLE 


PAT15: 


PAT16¢% 


172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 
172304 


070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 


SEG 0070 


£6 





RK611/REKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-PF 
11-AUG-76 00:00 


DZR6PB.P11 


2266 
2267 
2268 
2269 
2270 
2271 
2272 
2273 
2274 
2275 
2276 
2277 
2278 
2279 
2280 
2281 
22862 
2283 
2264 
2285 
2286 
2287 
2288 
2289 
2290 
2291 
2292 
2293 
2294 
2295 
2296 
2297 
229" 
2299 
2300 
2301 
230? 
2303 
2304 
2305 
2306 
2307 


006514 
006516 
006520 
006522 
006524 
006526 
006530 
006532 
006534 


006536 
006540 
006542 
006544 
006546 
006550 
006552 
006554 
006556 
006560 
006562 
006564 
006566 
006570 
006572 
006574 
006576 
006600 
006602 
006604 
006606 
006610 
006612 
006614 
006616 
006620 
006622 
006624 
006626 
006630 
006632 
006634 


014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 


133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 


MACY11 30€1046) O1-DEC-77 14:15 PACE 49 


DATA PATTERNS AND DATA PATTERN TABLE 


PAT17: 


WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
eWOPD 
WORD 
eWOPD 
WORD 
eWOPD 
WORD 
WORD 
WOFD 
eWOPD 
WORD 
-WORD 
eWCRD 
WORD 
WORD 
WORD 
@WOPD 
WORD 
eWGRD 
WORD 
e WORD 
oWOPD 
@WOPD 
-WOPD 
WORD 


014561 
070627 
113431 
014561 
070627 
113431 
014561 
070627 
113431 


133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 
133467 


SEC 0071 


Fé 








a a2 a a2 & & @2 &@& & @2 &2 42 2 2&2 & & 2a 42 @2 2 Oo A 





RK611/RK0O6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
_) OZR6PB.P11 11-AUG-76 00:00 


PROGRAM SETUP 


MACY11 30(€1046) O1-DEC-77 14315 PACE 50 


F cee eS8TTL PROGRAM SETUP 
0 
2310 006636 112737 000001 001361 PARSRT: NOVP #1,PLAG sSET FLAG FCK PARAMETER EWTEY 
- 2311 006644 000406 BR PRGSRT sSTART PROGRAP 
2312 
2313 006646 112737 177777 001361 RESTRT: HOVE #-1, FLAC gSET PLAG FOR RETRY 
2314 006654 000402 BR PRGSRT sSTAGT PROGRAP 
‘ 2315 
2316 006656 105037 001361 START: CLR FLAG sSET FOR WORPMAL PROGRAM START 
2317 006662 012737 000340 177776 PRGSRT: HOV GPRI,ZPS sLOCK OUT ALL INTERRUPTS 
2318 eSBTTL INITIALIZE THE COMMON TAGS 
2319 33CLEAR THE COMMON TACS (SCHTAG) ARES 
2320 006670 012706 001100 woV SSCMTAG, RE ddFIRST LOCATION TO BE CLEARED 
2321 006674 005026 CLR (R6)¢ S3CLEAK NEMCKY LCCATICN 
2322 006676 022706 001140 cwe SSUR,P6 3;3D0NE? 
2323 006702 001374 BWE 76 33LO0OP BACK IF HO 
2324 006704 012706 001100 nov @STACK, SP dsSETUP THE STACK POINTER 
2325 SSUNITIALIZE A PEW VECTORS 
2326 006710 012737 055034 000034 nov @STRAP,@ETRAPVEC 33 TRAP VECTOR PCF TRAP CALLS 
2327 006716 012737 000340 000036 mov 8340, 08TRAPVEC*2;LEVEL 7 
2328 006724 012737 053722 000024 nov SSPURDE, QPPURVEC 3;PCWER FATLUEE VECTOR 
2329 006732 012737 000340 000026 nov 8340, QGPUPTECS2 s;LEVEL 7 
2330 33STIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
2331 sEQUAL TO A "-1%, SETUP FOR A SOFTWARE SWITCH RECISTER. 
2332 006740 013746 000004 mov QSERRVEC,-(SP) 33SAVE ERROR VECTCR 
2333 006744 012737 007000 000004 MOV G64S,Q8ERRVEC 33SET UP ERROR VECTCR 
2334 006752 012737 177570 001140 nov #OSUR, SUR SSSETUP FOR A HARDWARE SWICH RECISTER 
2335 006760 012737 177570 001142 uov @ODTSP,DISPLAY  ;3ARNC A HARDWARE CISPLAY RECISTES 
2336 006766 022777 177777 «#172144 CMP @-1,eSUP 33TRY TO REFERENCE AARDWARE SUR 
2337 006774 001012 BRE 66$ S3BRANCH TF BO TIMEOUT TRAP OCCURFED 
2338 33AR0 THE MARDWARE SWR IS BOT = -1 
2339 006776 000403 BRP 65$ 37BR ARCH IF BC TIPECUT 
2340 007000 012716 007006 6452 MOV #65$,(SP) 33SET UP FOR TRAP RETOUR 
2341 007004 000002 RTI 
2342 007006 012737 000176 001140 65$: NOV #SWREC, SuP d3POINT TO SOPTWARE SUR 
2343 007014 012737 000174 001142 MCV @DISPREC, DISPLAY 
ne 007022 012637 000004 66$: MoV CSP)*,@#ERRVEC  Z3RESTOPE ERROR VECTOR 
2345 
2346 007026 005037 001176 CLR $PASS SSCLEAR PASS COURT 
2347 007032 132737 000200 001211 BITe GAPTSIZE,SENVY Z3TEST USER SIZE UNDER APT 
2348 007040 001403 BEQ 67$ 33VES,USE MON-APT SWITCH 
2349 007042 012737 001212 001140 MoV 15SVRFG, SYR 3300,USE APT SWITCH REGISTER 
2350 007050 67$3 
2351 -SBTTL TYPF PROGRAW RAME 
2352 s3TYPE THE WAME OF THE PROGRAW IF FIRST PASS 
2353 007050 005227 177777 Inc 821 22F10s1 TINE? 
2354 007054 001035 BWE 68$ dsBRAWCH TF AC 
2355 007056 104401 007064 TYPE 7269S s3TYPE ASCIZ STPING 
2356 007062 000432 BR 68$ 33GFT OVER THE ASCIZ 
2357 3369S: .ASCIZ <CRLFO*PKE1I/RKO6 PERFORMANCE EXEPCTSER: MATNDEC CZR6P-B"<CRLED 
2358 007150 68$: 
2359 007150 000005 PURSRT: RESET SRESET SYSTEM 
2360 007152 012737 007224 000004 wov #20S,FRRVEC sSET VECTOR FCR PEMCRY PARITY CHECK 
2361 007160 012737 000340 000006 nov #PR7,ERRVECe2 
2362 007166 012703 172100 mov #MEMBAS,R3 sLOAD REGISTER TO DTEPMIN IF 


— — — 


3 «6©MEMORY CHECK EWARLE ABAILIABLE 


SEC C072 


SG 





a @ @ @ @ @ @ @ @ @ @ @ @ @® @ @ @ @® @ @ _ 





RKG11/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-8 
_) OZR6PB.P11 


2364 
2365 
2366 
2367 
2368 
2369 
2370 
2371 
2372 
2373 
2374 
2375 
2376 
2377 
2378 
2379 
2380 
2361 
2382 
2383 
2384 
2385 
2386 
2387 
2368 
2389 
2390 
2391 
239? 
2393 
2394 
2395 
2396 
2397 
2398 
2399 
2400 
2401 
2402 
2403 
2404 
2405 
2406 
2407 
2408 
2409 
2410 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 


007172 
007176 
007202 
007210 
007216 
007220 
007222 


007224 
007226 
007234 
007240 
007244 
007252 
007256 
007262 
007264 
007266 
007270 
007276 
007302 


007306 
007312 
007316 
007322 
007326 
007332 
007240 
007344 
007350 
007352 
007354 
007356 
007362 
007366 
007370 
007372 
007374 
007400 
007404 
007412 


007416 
007422 
007426 


007430 
007436 
007442 
007444 
007450 
007452 
007460 


007462 


11-AUG-76 


012704 
012723 
012737 
012737 
005304 
001366 
000401 


022626 
012737 
005037 
004737 
012737 
012703 
012704 
005023 
005304 
001375 
012737 
105037 
005037 


005037 
005037 
005037 
005037 
105037 
112737 
012703 
012704 
005023 
005304 
001375 
012704 
012703 
005024 
005303 
001375 
004737 
105037 
013737 
005037 


105037 
105737 
100072 


013737 
105737 
001012 
105737 
001004 
162737 
000403 


162737 


000014 
000001 
051642 
000340 


000006 
000006 
053624 
000001 
001666 
000022 


065202 
001640 
00156? 


001460 
001560 
001622 
001624 
001627 
177777 
001314 
000010 


001540 
000010 


042574 
001506 
001466 
001462 
001502 
001361 
053720 
001365 
000041 


000300 


000114 
000116 


001664 


001666 


001507 


001464 


001670 


001670 


001670 


NOV 
16$: nov 
nov 
mov 
DEC 
BWE 
BR 


20$3 cwP 
22$: HOV 
CLR 
STARTS: JSR 
nov 
nov 
nov 
2$3 CLR 
DEC 
BRE 
nov 
CLRB 
CLR 


CLR 
CLR 
CLR 
CUR 
CLRB 
Move 
NOV 
MoV 
383 CLR 
DEC 
BWE 
nov 
MOV 
45: CLR 
DEC 
BRE 
JSR 
CLRP 
nov 
CLR 


CLR 
TSTB 
BPL 


“ov 
TST# 
BRE 
TsTs8 
BRE 
SUB 
BR 


10$: SUB 


MACY11 30€1046) O1-CFC-77 14315 PACE $1 
TYPE PROGPAM NAME 


#12.,R4 


SPAREN, (R3)¢ 
GMEMERR, MENVEC 
#PR7, MEMVECS2 
RA 


16$ 
22$ 


(SP )*, (SP)¢ 


sLOAD COURT 
SEMABLE MENCEY CHECK VECTORY 
SLOAD MEMORY CHECK VECTOR 


sCHECK TF FINISHED 
3UG, SET UP BEXT PEPOCRY PARITY PCLCULE 
sRESTORE TRAP VECTOR 


sADJUST STACK 


GERRVEC+2,ERRVEC ZRESTORE TRAP CATCHER 


ERRVECe2 


* PC, $SIZE 


@1,FBLKC 
@PBLKT,R3 


@BUP ADD, FELKT 
TYSCH 


RTYSC 
ERRPRO 


E.CONT 
ERCONT 
OLTCUT 
CRTCNT 
STATIS 
#-1,0.0VER 
@AVAILQ,R? 
#8.,R84 


PC, CHRCLK 
Wo TIME 


WoMILT,W.MTIN 


C.WAIT 


I.-ISRL 
FLAG 
RESTO 


SLSTAD, FELKT¢2 


OVLYLD 


10 
20$ 


$ 
896 .°%2.,FPLET¢2 


SCET MAXIWUM PEPORY ADDRESS 
STMITIALIZE FREE BLOCK COUNT 
sSTCEE FREE BLOCK TABLE ADDBESS 
SLOAD COUNT FOR FREE BLOCK CLEAR 
SCLEAR FREE BLOCK TABLE 
SDECREMEST COUST 

sCHECE If FPIBISHED 

SLOAD FIRST EWTRY IN FREE BLOCK TIBLE 
SCLEAR RETRY SECTCR COURT 

SCLEAR ADDRESS OF PARAMETER BLOCE 
3 PBOCESSIBG ERECR 

sCLEAR CONTROLLER ERROR FLACS 
SCLEAR RECOVERABLE CONTROLLER ERECA FLACS 
sCLEAR DATA LATE COUNT 

sCLEAR CTHER ERRCHRS COURT 

SCLEAR IBTERVAL STATISTICS FPLIG 
SSET ALL ORIVES FOR IMPLIED SEEKS 
dSTORE QUEVE PASE ADDRESS 

SLOAD QUEVE COURT 

SCLEAR QUEUE READS PND TAILS 
SDECREMENT COUNT 

sCHECK ITF FIBTSHED 

sLCAD ADDRESS CF TIPE CUT CCURTS 
sLOAD COURT 

SCLEAR DRIVE TIVE CUT COUNTS 
sDECKENENT COURT 

sCHECK ITF FIRISREC 

sCHECF TP CLOCK IS PRESENT 

SCLEAR DRIVES BEING TIMED 
STBITIALIZE MILT-SECOND TIMER 
sCLEAR PAPAPETER PLCCK FGR CRIVE 
3 WAITING COMMAND COMPLETION 
SRESET RELEASE OR CONTRCLLER CLEAR ISSUEC 
sCHECK TF RESTART 

aRC, CONTINUE 


SLOAC MAX. ADD IF FREE BLOCF TAPLE 
sCHECK TF OVERLAY LCADER 

sVES, LCAD BROG VECTCR ADDRESS 
sSEE WHO LOADED TRE PROBLEM 
JPRARCH IF XXDP 

sSUPTPACT APS LCACE® SIZE 

SLOAC VECTOR ADDRESS 


#1026.°7.,FBLEI¢2 sSUPTRACT XXDP LOADER 


“SEG 0073 


He 





a @ @ @ @ @ @ @ @ ® @ @ @ @ @ @ @ @ @ @ _ 





RK611/RKO6 PERFORMANCE EXERCISER MAIWDEC DZR6P-B 


OZR6PB.P11 


11-AUG-76 


2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 
2428 
2429 
2430 
2431 
2432 
2433 
2434 
2435 
2436 
2437 
2438 
2439 
2440 
2441 
2442 
2443 
2444 


244c 


a&eew 


2446 
2447 
2448 
2449 
2450 
2451 
245? 
2453 
2454 
2455 
2456 
2457 
2458 
2459 
2460 
2461 
2462 
2463 
2464 
2465 
2466 
2467 
2468 
2469 
2470 
2471 
2472 
2473 
2474 
2475 


007470 
007474 
007500 
007504 
007510 


007514 
007516 
007520 
007522 
007526 
007532 
007536 


007542 


007'550 
007556 
007560 
007564 
007566 
007572 


007574 
007602 
007606 


007610 


007614 
007622 
007630 
007634 
007640 
007644 
007650 
007654 
007656 
007662 
007666 
007672 
007674 
007700 


007704 
007706 
007710 
007712 
007714 


013704 
012724 
013714 
012703 
012704 


005304 
001434 
012305 
105065 
005065 
005065 
005065 


042765 


032765 
001756 
105765 
001003 
004737 
000750 


142765 
004737 
00074? 


000137 


012737 
012737 
005037 
005037 
005037 
012703 
012704 
012305 
005065 
005065 
105065 
010£00 
062700 
012701 


005020 
005301 
001375 
005304 
001357 


001446 
043470 
001450 
001520 
000011 


000145 
000212 
000150 
000146 


070006 
000001 
000210 
013324 


177757 
013250 


011230 


176543 
123456 
001372 
001370 
001366 
001520 
000010 


000014 
000212 
000210 


000232 
000012 


000014 
000014 


000210 


054276 
054300 


2152 


—öR 


2252 


205: 
RESTO: 


45: 


S$: 


DFC 
BEQ 
nov 
CLAaB 
ctr 
CLR 
CUR 


MACY11 30(€1046) O1-DEC-77 14315 PACE $2 
TYPE PROGRAM WKAME 


REVEC,R4 


ST. TUTR,CR4)e 


REPRI,(R4) 
@PBLET,R3 
99-,R4 


R4 

30$ 
CR3)O,R5 
P.BUFF CRS) 
P.ERRC(RS) 
P.DSTTCRS) 
P.RECTC(RS) 


sSTOKE VECTOR ADCHESS 

SLOAD BFO6 VECTOR ADDRESS 

> ABD IBSTERRUPT PRIORITY 

SLOAC PARAMETER BLOCK TABLE ADDRESS 
2.040 COURT 


SDECRENEBT COURT AND CHECK TF doet 
sYES, SET UP TTY INTERRUPT 

267 PAPAMETER BLOCK ADDRESS 

SCLEAR BUPFER ALLOCATED 

SCLEAR ERROR FLAGS AND RETRY COURTS 


RESET THE FOLLOWING ORIVER FLAGS 
DRIVE POSITIONING 
DRIVE POSITIONING FOR DATA TRANSFER 


BIC 


BIT 
BFQ 
TSTB 
BRE 
JSR 
BR 


BICcB 
JSR 
BR 


JuP 


nov 
uov 
CLR 
CUR 
CLR 
“ov 
“ov 
Mov 
CLR 
CLR 
CLRB 
nov 
ADD 
uov 


CLR 
DEC 
BNE 
DEC 
BNE 


DRIVE OMLOADED DUE TC ERROR 
PARAMETER BLOCK ENQUEVED IN INITIATION QUEUE 
SORVPOSIDPUPDTIDRVUSZDOIE.URLD IG. INIT, P. PRST( FS) 


SORVUSE,P.PRSTC(RS) SCRECK IF DRIVE Ib USE 


21$ 
P.ASSH(RS) 
22$ 

PC, TEST 
21$ 


380, CET REXT PARAMETER BLOCK 
SCHECK IF DRIVE IS BEING ASSICHES 
SYES, BESTART ASSIGBNERT SEGUEBCE 
STSSUE A START SPIGOLE IF BECESSARY 
SCET WEXT PARAMETER BLOCK 


S°CCBIT4>, P.ASSH(PS) SKEEP WRITE PACK BIT 


PC, TEST 
21$ 


REST2 


#176543, SHIRUP 
#123456, SLORUPM 


SECOND 
MINUTE 
HOUR 
#PBLKT,R3 
#8.,R4 
(R3)¢,RS 
P.PRST(RS) 
P-ERR(RS) 
P.ASSHCRS) 
RS, RO 
#P.EXAR,RO 
#10.,R1 


STMITIATE ORIVE ASSIGHMEBT SEQUENCE 
3GET WEXT PARAMETER BLOCK 


dSET TTY INTERRUPT 
STMITIALIZE GABCCY HUMBER CENFRAICE 
STMITIALIZE INTERRAL CLOCK 


SLOAD PARAMETER BLOCK TABLE ADORESS 
sLOAC COURT 

sCET PARAWETER BLCCK ADDRESS 

SCLEAR RKOG PROGKAM DEVICE STATUS HFC. 
SCLEAR DRIVE ERROR PLAGS 

SCLEAR DRIVE ASSICRMENT CODE 

sSTOBF RO FCK TRACK EXCLOSICHS 
SDETERMINE TRACK EXCLUSION BLOCK 

sLOAD COURT FOR CLEARING TRACK EXCLUSION 
3 | =6PLOCK 

sCLEAR TRACK EXCLUSION EuTRY 
SDECREMENT COUNT 

SCHECK TF WHCLE BLOCK CLEARED 
sDECKEMERT CCUBT 

sTEST IP DOWE 


SEG 0074 


Fo 





RK611/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-B8 
DZR6PB.P11 


2476 
2477 
2478 
2479 
2480 
2481 
2462 
2483 
2484 
2485 
2486 
2487 
2488 
2489 
2490 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2498 
2499 
2500 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2508 
2509 
2510 
2511 
2512 
2513 
2514 
2515 
2516 
2517 
2518 
2519 
2520 
2521 
252? 
2523 


007716 
007724 
007726 


007732 
007736 
007742 
007744 
007746 
007750 
007752 
007754 
007760 
007762 
007764 
007770 
007772 
007772 
007776 
010000 
010002 
010006 


010010 
010012 


010016 


010024 
010030 
010034 
010036 
010040 
010042 
010044 
010050 
010052 
010056 
010062 
010064 
010072 


010074 
010102 


010104 
010104 
010110 
010112 
010114 
010120 


010122 


010130 
010134 


11-AUG-76 


122737 
001402 
000137 


104401 
004037 
007772 
010010 
011060 
007732 
010346 
004737 
007772 
012604 
022704 
101010 


010337 
104401 
000000 
104401 
000751 


005004 
110437 


013737 


104401 
004037 
010104 
010052 
011072 
007732 
122713 
001424 
105037 
105737 
001004 
162737 
000416 


162737 
000412 


010337 
104401 
000000 
104401 
000736 


112737 


104401 
013746 


00:00 
000001 
011060 


056250 
020116 


053316 
000400 
010000 
001164 
001364 


053720 


056260 
020116 


000131 


001365 
000041 
000300 


010112 
001164 
177777 


056300 
001670 


001361 


001670 


001670 


001670 


001365 


MACY11 30€1046) O1-DEC-77 14215 PAGE 53 


TYPE PROGRAM WAME 


10$: 


11$: 


64$: 


13$: 
14$3 


15$: 


1652 


17$: 


18$: 


65$% 


19$: 
2052 


CMuPR 
BEQ 
JMP 


TYPE 
JSR 
11$ 
13$ 
$1$ 
10$ 
nov 
JSR 
11$ 
nov 
cue 
BRI 


#1, FLAG SCHECK IF PARAMETER START 

10$ SYES, ASK FOR PARANETERS 

$1$ sUSF DEFAULT VALUES 

@ SY¥S000 sTYPE "CPO TD" 

RO, TSTDEF SCHECK POR DEFAULT PARAPETERS 


sCOMRA DETECTED 

SCARRIACE RETURE DETECTED 
sCONTROL Z <*Z> DETECTED 

sCONTROL C <°C> DETECTED 


R3,-( SP) SLCAC BUFFER ADDRESS OF STACK 

PC, OCTBIN sCORVERT TO BIBARY 
JERROR RETURE 

(SP ),R4 sSTORE TRPUT VALUE 

#400,R4 sCHECR TF 0-377 

14$ sVYES, LOAD CPU ID 

R3,64$ SLCAC BUFFER ADLEESS 
STYPE RECEIVED InPUT 

0 SRUFFER ADDRESS 

@SQUES STYPE QUESTION PARK 

10$ sTRY AGAIB 

ka sCLEAR CPU ID (R4) 

R4,CPUID sLOAD CPU ID 


SLSTAD,FBLKT¢2 jsLOAC LAST ADDRESS IW FIRST 
} FREE BLOCK ENTRY 

@S¥S001 STYPE “OVERLAY LCADER® 

RO, TSTDEF SCHECK FOR DEFAULT PARAPETERS 
3COMMA DETECTED 
SCARRTACE RETORE CETECTED 
sCONTROL ⁊ <°2> DETECTED 
sCOWTROL C <*C> DETECTED 


#°¥,(R3) sCHECK IF YES 

19$ SYES, IWOTCATE THAT LOADER RAS PEER OVERLAYECL 
OVLYLD STMDICATE THAT LOSDER HAS BCT BEER CVERLAYET 
41 3SEE WHO LOADFD TRE PROCRAK 

17$ sBRABCH IP XX0P 


#96.°2.,FPLET¢2 ;SUBTRACT ABS LCACER SIZE 
20$ 39SK FOP MAXIMUM TRANSFER SIZE 


91536.*2.,FBLET*¢2 ;SUBTRACT AXOP LOADER SIZE 


20$ ZASK FOR TRARSEFR SIZE 
R3,65$ sLOAD BUFFER ADDRESS 
. gTYPE RECEIVED TAEUT 
0 sBUPFER ADDRESS 
@SQUES ' gTYPE QUESTION MARK 
15$ sTRY AGAIN 
#-1,0VLYLD sTMDICATE THAT LOADER HAS BEEN CVERLAVET 
2 SY¥S002 STYPE “WAXIVUPY TRANSFER” 


FBLKT¢2,-( SP) sSTOKE LAST USABLE PEMORY LOCATICE 


S&@ 6075 





ee. @ @ @ @ @ @ @ @ @ @ @ @ @. 


eo @ @ @ @ @ @ 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 
OZR6PB.P11 11-AUG-76 00300 


2532 010140 163716 001666 
2533 010144 022716 027000 
2534 010150 101402 
2535 010152 006216 
2536 010154 000402 


2537 
010156 012716 


2538 

2539 

2540 010162 012637 

2541 010166 013746 

2542 010172 004737 

2543 010176 104401 

2544 010202 004037 

2545 010206 010250 

2546 010210 010266 
010212 011122 
010214 007732 


013400 


001564 
001564 
052144 
056332 
020116 


21$: 
2252 


2547 
2548 


2549 
2550 
2551 
2552 
2553 
2554 
2555 
2556 
2557 
2558 
2559 
2560 
2561 
2562 
2563 
2564 
2565 
2566 
2567 
2568 
2569 
2570 
2571 
2572 
2573 
2574 
2575 
2576 
2577 
2578 
2579 
2580 
2561 
2582 
2583 
2584 
2585 
2586 
2567 


010216 
010220 
010224 
010226 
010230 
010232 
010236 
010240 
010244 


010246 
010250 
010250 
010254 
010256 
010260 
010264 


010266 
010274 
010302 
010304 


010312 
010316 
010322 
010324 
010326 
010330 
010332 
010334 
010340 
010342 
010346 
010350 
010354 


010356 
010360 


010346 
004737 
010246 
012604 
001407 
020437 
101004 
010437 
000422 


005726 


010337 
104401 
000000 
104401 
000721 


013737 
022737 
103003 
012737 


104401 
004037 
010360 
010376 
011160 
007732 
010346 
004737 
010360 
023716 
103403 
012637 
000413 


005726 


053316 


001564 
001354 


010256 
001164 
001564 
013400 


013400 


056336 
020116 


053452 
001354 
001362 


001354 
001354 


001354 


23$: 
24$3 
66$: 


26$: 


2752 


2657 
2952 


SUB 
CMP 
BLOS 
ASR 
BR 


MACY11 30(1046) O1-DEC-77 14:15 PACE 54 


TYPE PROGRAP FAME 


FBLET,(SP) sCALCULATE MEMORY LEFT 
#256.°%23.*%2.,(SP) sCHECK IF GREATER THAR OF EQUAL 10 S86 


S&¢ 0076 


21$ sYES, USE S868 
(SP) SDETEPNIBE BOPBER CF WORDS 
22$ STYPE VALUE 
#256.°%23.,(SP) s,LCad $eee 
(SP eo, TMPCHT SSAVE TPARSPER COUNT 
TMPCUT,-(SP) SSAVE TRABSFER COUNT FOR TYPE OUT 
PC, BINOCT sCONVERT TO OCTAL 
@S¥S003 
RO, TSTOEF SCHECK FOR DEFAULT PARAMETERS 
sCOMMA DETECTED 
SCARRIAGCE RETORN DETECTED 
sCONTROL Z <“Z> DETECTED 
sCOWTROL C <“C> DETECTED 
R3,-(SP) SSTOKE SUFFER ADDRESS OR STACK 
PC, OCTBIN sCORVERT TO BINARY 
JERROR RETURE 
(SP )*,R4 sSTORE IePUT 
24$ sCHECK TP ZEKC 
R4, TMPCRT sCHECK TP LEGAL ENTRY 
24$ 3¥O, TRY AGAIN 
R4,MAXBUF SLOAD MAXINUP TRANSFER 
27$ 3GET uC. CF SCFT COMPARES 
(SP De sADJUST STACK 
R3,66$ sLOAC BUFFER ADDRESS 
sTYPE RECEIVED INPUT 
0 sBUPFER ADDRESS 
7$QUES STYPE QUESTION MAPK 
20$ sTRY AGAIN 


TMPCUT,MAXBUF ;LOAD MAXTHUM TRANSFER 
#256.°%23.,MAXBUF SCHECK IF LESS THAR OR EQUAL TC 23 SECTCFS 


27$ 


#256.°23.,MAXBUP 3USE 23 SECTORS 


2 S¥S004 sTYPE "WC. CF SCETHARE COMPARISCAS® 
RO, TSTDEF SCHECK FOR DEFAULT PARAPETERS 
sCOMPA DETECTED 
SCARBIAGE RETUGR CETECTED 
sCOWTROL Z <*Z> DETECTED 
sCONTROL C <“C> DETECTED 
R3,-(SP) SSTOKE PARNETER 
PC,DECBIN sCCRVERT TO BIBAGY 
JERROR RETURD 
MAXPUF, (SP) sCHECE IF LEGAL INPOT 
28$ STYPE VALUE ABD RETPY 
(SP)¢,SOFCHP sLCAC BOMBER CF SCPTWARE CCPPARES 
31$ SDETERMINE RKOG UNIBUS ADDRESS 
(SP) sADJUST STACK 


3YES, USE CALCULATED VALUE 


: 





—————$—$_ LL LLL — — 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30(1046) O1-CEC-77 14315 PACE 55 
DZR6PB.P11 11-AUG-76 00:00 TYPE PROGRAM WAME SEG 0077 
25868 010360 010337 010366 Mov R3,67$ SLOAD BUFFER ADDEESS 
2589 010364 104401 TYPE STYPE RECEIVED TePUT 
2590 010366 000000 67$2 eWORD 0 SBUPFER ADDRESS 
2591 010370 104401 001164 TYPE @SQUES STYPE QUESTIOH PAFK 
2592 010374 000746 BR 27$ sTRY AGIA 
2593 
— 010376 012737 000003 001362 30$: nov #3, sor cup 21040 DEFAULT VALUE 
2595 
2596 010404 105737 001374 31S: TSsTB CLKFLG sCHECK Tf CLOCK CR SYSTEM 
2597 010410 001434 BEQ 41$ 380, CONTINUE 
2598 010412 104401 056517 TYPE @ S¥S009 STYPE “STATISTIC INTERVALS" 
2599 010416 004037 020116 JSR RO, TSTOEF sCHECR FOR DEFAULT PARAPETERS 
2600 010422 010460 34$ 3COMMA DETECTED 
2601 010424 610476 35$ SCARETACE RETURN DETECTED 
2602 010426 011166 SS$ sCONTROL 2 <*2> CETECTEC 
2603 010430 007732 10$ sCORTROL C <*C> DETECTED 
2604 010432 010346 nov R3,-(SP) sSTORE FUMBER FOR CONVERSION 
2605 010434 004737 053452 JSR PC, DECBIN SCONVERT TO BINARY 
2606 010440 010460 34$ STLLECAL WOPBES 
2607 010442 012604 Mov (SP)e,R4 sSTOKRE WUMBER 
2608 010444 022704 000377 CMP #255.,R4 SCHECK TF GREATER TRAN 255 
2609 010450 103403 BLO 34$ 380, TRY AGAIB 
2610 010452 110437 001360 mOvVP R4,PERINY sLGAD PERPOPMABCE IBTERVAL 
2611 010456 000411 BR 41$ sCONTINVUE 
2612 
2613 010460 34$% 
2614 010460 010337 010466 uov R3,68$ sLCAC BUFFER ADDEESS 
2615 010464 104401 TYPE - STYPE RECEIVED ITHPUT 
2616 010466 000000 68S: eWORD 0 sBUFFER ADDRESS 
2617 010470 104401 001164 TYPE 7S$QUES STYPE QUESTION PARK 
2618 010474 000743 BR 31$ sTRY AGAIN 
2619 
2620 010476 105037 001360 35$: CLRE PERIEV sSET UP FOR BO ISTERVAL STATISTICS 
2621 
2622 010502 104401 056370 41$: TYPE 2 SY¥S005 sTYPE “PKO6 BUS ALD.” 
2623 010506 004037 020116 JSR RO, TSTOEF SCHECK FOP DEFAULT PARAPETERS 
2624 010512 010626 44$ sCOMMA DETECTED 
2625 010514 010644 4s$ sCAPGTACE BETUEN CETECTED 
2626 010516 011172 S6$ sCONTROL 2 « 72 CETECTED 
2627 010520 007732 10$ SCORTROL C <*C> DETECTED 
2628 010522 010346 nov R3,-(SP) SSTORE PARAWETER 
2629 010524 004737 053316 ose PC, OCTBIb sCCRVERT TO BIBAKY 
2630 010530 010626 44$ sERRCP RETUPE 
2631 010532 012604 nov (SP )o,R4 sSTORE TePUT 
2632 010534 022704 160000 cup #160000,R4 SCHECK TF I/C PAGE 
2633 010540 101032 BHI 44s sUC, TRY ACATS 
2634 010542 012737 010602 000004 nov #42$ ,ERPVEC SLCOAD ERRVEC TO BCH-EXISTERT PEPCFY 
2635 010550 013737 000340 000006 nov PR7 ,ERRVECe2 3 PRIORITY 7 
2636 010556 005714 tst (P4) SCHECK FOR ROR-EXISTEST MENORY 
2637 010560 012737 000000 000006 nov Q<CHALT>,EFRVECe2 SREINSTATE TRAP CATCHER 
2638 010566 012737 000006 000004 MOV @ERRVEC*2,ERRVEC 
2639 010574 010437 001444 “ov R4,RKBAS SLECAL 1/C ADDRESS, LOAD RKO6 BASE 
or 010600 000424 BR 48$ sCET VECTCR ADCRESS 
4 
2642 010602 012737 000000 000006 42$: nov S<HALT>,ERRVEC*¢? ZKEINSTATE TRAP CATCHER 
2643 010610 012737 000006 000004 nov SERPVEC*2,ERRVEC 


Lb 











RE611/RKO6 PERFORMANCE yo es MAINDEC DZR6P-B 
OZR6PB.P11 


2644 
2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
2683 
2684 
2685 
2686 
2687 
2688 
2689 
2690 
2691 
2692 
2693 
2694 
2695 
2696 
2697 
2698 
2699 





010616 
010622 
010626 
010626 
010632 
010634 
010636 
010642 


010644 


010652 
010656 
010662 
010664 
010666 
010670 
010672 
010674 
010700 
010702 
010706 
010710 
010714 


010716 
010720 
010720 
010724 
010726 
010730 
010734 


010736 
010744 
010750 
010754 
010756 
010760 
010762 
010764 
010766 
010772 
010774 
011000 
011092 
011006 
011010 
011012 
011014 
011016 
011020 
011022 
011026 


011030 


11-AUG-76 


062706 
104401 


010337 
104401 
000000 
104401 
000717 


012737 


104401 
004037 
010720 
010736 
011200 
007732 
010346 
004737 
010720 
022716 
101403 
012637 
000413 


005726 


010337 
104401 
000000 
104401 
000746 


012737 
104401 
004037 
01103? 
011050 
011206 
007732 
010346 
004737 
011032 
022716 
103413 
022716 
101010 
006316 
006316 
006316 
006316 
006316 
012637 
000472 


005726 


010634 


001164 


177440 


056406 
020116 


053316 
001000 
001446 


010726 


001164 


000210 
056543 
020116 


053316 
000007 
000004 


001450 


001444 


001446 


44S: 


45$3 
48$: 


49$3 
50$: 


70$s 


51$% 
53$% 


55$: 


adDd 
TYPE 


nov 
TYPE 
WORD 
aTPE 
BR 


WACY11 30(1046) O1-DEC-77 14315 PAGE 56 
TYPE PROGRAM WAME 


#4,5°? 
@ SY¥S007 


R3,69$ 

0 

7SQUES 

41$ 

#177440, RRBAS 


@ STS006 
RO, TSTDEF 


R3,-(SP) 
PC, CCTBIb 


#1000, (SP) 
49$ 

(SP), RKVEC 
53$ 

CSP) 
R3,70$ 

0 

@$QUES 

48$ 
#210,PRKVEC 


@SY¥S010 
RO, TSTDEF 


R3,-(SP) 
Pc, CCTBIN 


#7, (SP) 


(SP )¢,RKPRI 
REST1 


(SP )o 


sADJUST STACK 
STYPE “HOR-EXISTERT HENCRY® 


SLOAC BUFFER ADDRESS 
STYPMRECEIVED THPUT 
s8UPHER ADDRESS 
STYPE QUESTION PARK 
sTRY AGAIN 


SLOAC DEFAULT BUS ADDRESS 


STYPE "RKOG VEC ADD" 
SCHECK POR DEPAULT PARAMETERS 
sCOMMA DETECTED 

SCARRIACE RETURN DETECTED 
sCORTROL 2 <“Z> CETECTED 
SCONTROL C <“C> DETECTED 
SSTORE PARAPETER 

sCORVERT TO BIBASY 

SERROR RETURD 

SCHECK IF VECTOR SPACE 
30, TRY ACAI 

sLCAD VECTOR ADDEESS 

sGET PRIORITY 


SADJUST STACK 


sLOAD BUFFER ADDRESS 
STYPE RECEIVED TePUT 
sBUFFER ADDRESS 

STYPE QUESTICEH PARK 

aTRY AGAIV 


SLOAD DEFAULT RROE VECTOR 
STYPE @PKOG PRICK=* 
SCHECK FOR DEFAULT PARAMETERS 
sCOMMA DETECTED 

sCARETACE RETURN CETECTED 
sCONTROL Z <“7> DETECTED 
sCONTROL C <*C> DETECTED 
SSTORE PARAPETER 

sCONVERT TO BINARY 

ZERROR RETURN 

sCHECK Tf OCTAL 


sSHIFT S BITS LEFT 


sLOAD PRIORITY 


SULCAC GROG VECTCK AND TTY VECTCE 


sADJUST STACK 





SEQ 0076 


Me 


a & @& oe ae eo ea ae Ge ae ee eae Se Se Se eS ee Se me 





ee * — ~~ he 


— 


— i. 


RE611/RKO6 PERFORMANCE EXERCISER PATNDEC DZR6P-P 


07 R6PB.P11 


2700 
2701 
2702 
2703 
2704 
2705 
2706 
2707 
2708 
2709 
2710 
2711 
271? 
2713 
2714 
2715 
2716 
2717 
2719 
2719 
2720 
2721 
2722 
272? 
2724 
2725 
2726 
2727 
2728 
2729 
2730 
2731 
2732 
273? 
2734 
2735 
2736 
2737 
2738 
2739 
2740 
2741 
2742 
2743 
2744 
2746 
2746 


011032 
011032 
011036 
011040 
01104? 
011046 


011050 
011056 


011060 
011064 
011072 
011076 
011102 
011104 
011112 


011114 
01112? 
011126 
011132 
011136 
011140 
011142 
011150 


011152 
011154 
011160 
011166 
011172 
011200 
011206 


011214 
011220 
011224 
011230 
011234 
011740 
011244 
011246 
011252 
011256 
011264 


11-AUG-76 00:00 


010337 
104401 
000000 
104401 
000736 


012737 
000456 


105037 
013737 
105037 
105737 
001004 
162737 
000403 


162737 
013746 
163716 
022716 
101005 
005726 
012737 
000403 


006716 
012637 
012737 
105037 
012737 
012737 
012737 


013704 
012724 
013714 
004737 
104401 
005227 
001002 
104401 
004737 
013737 
005037 


011040 


001164 


000240 


001364 
053720 
001365 
000041 


000300 


006000 
001670 
001666 
027000 


013400 


001354 
000003 
001360 
177440 
000210 
000240 


001446 
043470 
001450 
042666 
056451 
177777 


064776 
052712 
001450 
177776 


001450 


001670 


001670 


001670 


001354 


001362 
001444 


001446 
001450 


0000 36 


MACY11 30€1046) O1-CFC-77 14:15 PAGE 57 


TYPE PROGPAY WAME 


7152 


5752 


$1$% 
$2$3 


1$: 
S$3$3 


1$: 


S4$3 
s5$: 
5652 
5752 
S8$3 


RESTi? 


REST2: 


R3,71$ sLGAC BUFFER ADDRESS 
STYPE RECEIVED INFUT 
0 sBUFFER ADDRESS 
7$QUES dTYPE QUESTICR MAPK 
$3$ sTRY AGAIN 
SPRS,RKPRI sLOAD PRIORITY 
REST1 dLOAD RFOG VECTCR ABD TTY VECTOP 
CPUID sLOAD DEFAULT CPU ID 
SLSTAD,FBLKT+2 ;LOAD LAST ADDRESS 
OVLYLD STMDICATE THAT THE LOADER IS WOT CVERLAYEC 
41 ZSEF WHC LCADFD PROCRAM 
1$ sPRANCH IP FXDP 
#96.°%2.,FRLET¢2 ;SUPTPACT ABS LCADER SIZE 
$3$ 260 DETERMINE MAX BUFFEF SIZE 


81536.°%2.,FALKT¢2 Z;SURTRACT AXOP LOADER SIZE 
FBLKT+2,-(SP) SSTOKE WAXIPUP ADDRESS 


FRLET,(SP) sCETERMIBE PEPCRY AVATLIAPLE 
#256.°%23.%2.,(SP) s;CHECK TF ENCUCH ROOM 

1$ sNO,LOAD MEMORY AVILIABLE 

(SP )+¢ dADJUST STACK 

#256.°%23.,MAXPUF 3LCAD PAXIPMUP BUFFER SIZE 

S4$ SLOAD WOMPER CF SOFTWARE COMPARES 
(SP) SCHABGE 10 WCRDS 

(SP)¢,MAXBUF SULOAC MAXTMUM BORDS TRANSFERRED 
#3, SOFCMP sLOAD WO. OF SOPTWARE COMPARES 
PERINV sSET UP FOR BO IKTERVAL STATISTICS 
#177440, RRBAS sULCAC DFFAULT BUS ADDRESS 

#210, PKVEC #LOAC DEFAULT VECTOR ADDRESS 
#PRS,PKPRI SLOAC REOG PRICRITY 

REVEC,R4 sSTORE VECTCR ADORESS 

HI TNTR, (R4 De sLOAC RFO6 VECTOR ADDRESS 
REPRI,(R4) 3 AND YNTEPRUFT PRICRITY 

PC, CLEINT S INITIALIZE CLOCK VECTOR ADRESS 
7 SY¥S008 sTYPE “READY TO BEGIN TESTIRG™ 
#-1 sTYPE HELP YESSAGE Ch FIRST PASS 
S$ 

HELP 

PC, STK IXT dSET UP TTY INTEKRUPT 
REPRI,TRAPVEC*¢2 ;ALLCW L AND P CLCCR INTERRUPTS 
PS ZALLCW PKOG INTERFUPTS 


£EC 0079 


A7 











2766 011352 
2767 011356 
2768 011360 
2769 011364 
2770 011366 
2771 

2772 011372 
2773 «011376 
2774 011400 
2775 011402 
2776 011404 
2777) «011412 
2778 011414 
2779 011420 
2780 

2781 011422 
2782 011430 
2783 

2784 011432 
2785 011436 
2786 011442 
2787 011446 
2788 011450 
2789 011456 
2790 011462 
2791 011464 
2792 011470 
2793 011472 
2794 011476 
2795 011502 
2796 011506 
2797 011510 
2798 

2799 011512 
2800 011516 
2801 011520 
2802 011524 


004737 012772 
005724 3$3 
000020 
001627 


050766 11$: 


022704 
101364 
105037 


004037 
001314 
012605 
001732 
032765 
001403 
004737 
000723 


032777 
001002 


105065 
004737 
105765 
001310 
013737 
005737 
001013 
004037 
011512 
005037 
004737 
004037 
001324 
000667 


002000 000014 


012716 


040000 167510 12: 


000211 
020640 15$% 
000211 


001450 
001320 


022114 
177776 


022532 
050706 


177776 


004037 
001320 
005037 
000661 


050706 2552 
177776 


E LOOP 


cre 
BEQ 
HALT 
JSR 
JSR 
Ttst 
BMI 


BIT 


BRE 
TSTB 
BEQ 
CLR 
nov 
BIT 
BEQ 
JS 
Tst 
cMuP 
BHI 
CLEP 


JSR 
AVATLQ 
nov 
BEQ 
BIT 
BEQ 
JSR 

BR 


BIT 
BWE 


CLR 
JSR 
TSTB 


BNE 
JSR 


JSR 
JSR 
CInIta@ 


JSR 
BVAITQ 
CLR 


e 
RE611/RKO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-8 
DZR6PB.P11 11-A0G-76 00:00 MAIN TOL 
2747 eSBTTL MAIW IDLE LOOP 
2748 
2749 011270 022706 001100 MAIWs 
2750 011274 001401 $ 
2751 011276 000000 
2752 011300 004737 051240 1$s 
2753 011304 004737 043314 
2754 011310 005737 001560 
2755 011314 100765 
2756 
4 011316 032777 060000 167614 
2758 
2759 011324 001022 11$ 
2760 011326 105737 001627 
2761 011332 001417 
2762 011334 005004 R 
2763 011336 016405 001520 $: 
2764 011342 032765 000001 000014 
2765 011350 001402 
a 


MACY11 30(1046) 


O1-CFC-77 14315 PAGE 58 


seq 00rd 
#STACE,SP sCHECK YF STACK PPOBLENM 
1 sO, CORTINUE 
3 *** PROCRAW PROBLEM 
PC,C.CPT sCALL COMMAND CPTIMIZER 
PC, ¥.WTCH sCALL WATCH DOG TIMER 
ERCONT sCHECK TF IW SPECIAL ERROR SEQUENCE 
MAIN sYES, DO BOT PRINT INTERVAL STATISTICS Ch 
AOD DRIVES TO TESTING SEQUENCE 
@SW149SW13,8SWR ;CHECK IF LOCP O8 OPERATION OF 
3 IWHIFIT PRINT CUT 
sYES, DO WOT PRINT CUT INTERVAL STATISTICS 
STATIS sCHECK FOR INTERVAL STATISTICS 
11$ 380, CONTINUE SCAR 
4 SSTART WITH DRIVE 0 
PPLETC(R4), KS SCET PARAWETER BLCCK ADDRESS 
SORVUSE,P.PRSTC(CRS) SCRECK IF DRIVE IS IW OSE 
3$ 30, LOCK AT FEXT PARANETER BLOCK 
PC,STAT 3GET STATISTICS 
CR4)¢ STUCREMENT DRIVE INDEX 
#20,R4 SCHECK IF ALL DRIVES SCANNED 
2s 3¥O, DC BEXT DRIVE 
STATIS SRESET FLAG 
RO,Q.POP sCET FIRST DRIVE FROM ORIVE 
3 AVAILABLE GUEUF 
(SP)o,R® sSTOKE PARAMETER BLCCK ADDRESS 
MAIN 3TF GUEVE EPPTY WAIT 
@DRPDRV,P.PRSTC(RS) ZCHECK IF DROP DRIVE 
12$ 380, GENERATE BEB COMMARD 
PC, DROP sDROP DRIVE 
MAIN sGET WEXT AVAILABLE DRIVE 
#Su14,@SuR sCHECK IF LOCP Ch OPERATION 
155 sYES, DO nor CLEAR SEEK TC PREVICUS 
3 CYLINDER FLAC 
P.SEEK(RS) SCLEAR SEEK TC PREVIOUS CYLINDER 
PC, CEWERT SGEWERATE BEB CCHPAKD 
P.SEER( RS) sCHECK IF SEER TC PRPETOUS CYLINDER 
MAIN sYES, GET MFXT AVAILIABLE DRIVE 
RFPRI,PS sLOCK CUT REOG IBTEPRUPTS 
BWAITQ SCHECK ITF BUFFER WAIT QUEVE EMPTY 
25$ 3NO, ENQUEVE PARAMETER BLOCK 
RO, BUFF AL ZALLCCATE BUFFER 
sNCT ENCUCH KCCP RETURN 
PS ZALLOW RKOG INTERRUPTS 
PC,LDDATA sLOAC BUFFER 
RO, Q. PUSH }PUT PARAMETER BLCCK ON COMPARD 
3 INITIATION GUEVE 
MAIN dCET NEXT AVAILABLE DRIVE 
F0,Q.PUSH ZPUT PARAMETER PLCCR OW BUFFER 
3 WATT QUEUE 
PS SALLOW RKOG INTERRUPTS : 
MAIN SGET WEXT AVAILABLE DRIVE - a % 
87 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30€1046) O1-DEC-77 14215 PAGE 59 
DOZREPB.P11 11-AUG-76 00:00 OPERATOR COMMAND DECODER SEQ 0081 
2803 eSBTTL CPERATOR COMMAND DECODER 
oe ppt Meeanerncananneanansansnnenanaeeaseneseannaneasaanenesanennnes 
2806 3* 
2807 3° THE LEGAL COMMANDS ARE: 
2808 3* THe INITIATE TESTING OW DPIVE W 
2809 3* PH- CRAWGE PAPAWETER AND INITIATE TEST CB 
2810 3* ORIVE W 
2811 3* ON- DROP DRIVE FROM TESTING SEQUENCE 
2812 3* SNe DEMAND PERFORMANCE SUMMARY ON DRIVE 8 
2813 3* w= WRITE RANDOM DATA PATTERNS CW DRIVE BW 
2814 3* AND INITIATE TESTING. 
2815 p* 
2816 3*CALL JSR PC, OPPC¥D 
2817 3? RETURN 
28618 oe 
2819 3* 
2820 3* COMMAND ROUTINE 
2821 3* ooceoee · 
2822 3* 
2822 3* TH TESTDYV 
2824 3* PA PARMDV 
2825 3* OW DROPDYV 
2826 3* SB STATDY 
2827 3* un WRTEPK 
2828 3* 
2829 FP TMAMAAARARAAAAAAAEReRAREAEAVARAeAeAeRORARE HEARD eeARANAEARE ENED 
2830 
2831 011526 010446 OPRCMD: MOV R4,-(SP) pSTORE R4 OW STACK 
2832 011530 104401 055317 TYPE 7OPRO07 3TYPE “PLEASE ENTER CONPAND® 
2833 011534 104403 RDOLIB ZREAD LIBE FROM TTY 
2834 011536 012604 nov (SP )+,R4 SSTORE ADDRESS OF IGPUT STRINC 
2835 011540 116437 000001 055154 MOoVR 1(R4),0PRO01 SMCVE SECOND CHARACTER TC CEIVE 
2836 3 REQUEST STORAGE 
2837 011546 122737 000101 055154 CwPB #°A,OPROO1 SCHECK TF ALL OPIVES 
2838 011554 001421 BEG 4s 3VES, PRCCESS ALL DPIVES 
2839 011556 122737 000060 055154 CuPB #°0,O0PRO01 sCHECK YF LEGAL CRIVE NUMBER 
2840 011564 101004 BI 2s 3¥O, PRINT ERROR 
2841 011566 122737 000067 055154 cupn #°7,0PR001 gCHECK TF 0-7 
2842 011574 103006 BHIS 3$ 3VES, PROCESS CRIVE COMMAND 
2843 011576 104401 055137 2S: TYPE 7 OPROO0O 3TYPE “DRIVE RUPBER W ILLEGAL?® 
2844 011602 104401 055157 TYPE 7 OPROO2 
2845 011606 012604 MOV (SP)o,R4 ZPESTCRE R4 
= 011610 000207 RTS PC sPETURD 
284 
2848 011612 142737 000370 055154 3$s BICB #370,0PR001 3CLEAR ONTMPORTAAT PITS 
2849 011620 010546 4$: MoV R5,-(SP) ZSTICKE RS OF STACK 
2850 011622 122714 000124 CrvPB #°T,(P4) SCHECK IF TEST DRIVE 
2851 011626 001427 BFEQ TESTOV sYES, GO TO TEST DRIVE 
2852 011630 122714 000120 CPR a°P,(R4) ZsCHECK TF TEST ABC CHANCE FARANETERS 
2853 011634 001512 BEQ PARYDYV 3YES, GO TEST AND CRANGE PARAMETEFS 
2854 011636 122714 000104 CMPB #°D, (R4) sCHECK IF DROP DRIVE 
2855 011642 001553 BEQ DROPDV sYES, GO DROF DRIVE 
2856 011644 122714 000123 CwPpR #°S,(PR4) sCHECK YF DeMAND STATISTICS 
2857 011650 001002 BNE 5$ 
2858 011652 000137 012352 Jue STATDOV sYES, GO TO DEMAND STATISTICS 








C7 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC OZR6P-B8 


OZR6PB.P11 


2859 
2860 
2861 
2862 
2862 
2864 
28665 
2866 
2867 
2868 


011656 
011662 
011664 


011670 
011674 
011700 
011702 
011704 


11-AaUG-76 00:00 


122714 
001002 
000137 


111437 
104401 
012605 
012604 
000207 


000127 
012526 


055131 
055100 


6$3 


crpr 
BWE 
Jve 


wOVP 
TYPE 
“OV 
nov 
RTS 


MACY11 30€1046) Oi-CFC-77 14315 PAGE 60 
OPERATOP COMMAND DECODER 


aru, (P4) 
6$ 
WRTEPF 


(R84), ILLCPE 
a ILLCon 

(SP )e,R5 
(SP )e,R4 

ec 


sCHECK Tf WRITE FACE AND TEST 
sYES, GO WRITF PACK AND TEST 


SSTOKE COMMARD FCR PRINT OUT 
sTYPE ERROR MESSAGE 

SRESTORE RS 

SRESTORE R4 

sPETURS 


¥ 
x 


ln"aleave"ctatatatatntatetatatatciatntntete's 


© <q 
DZR6PB.P11 11-AUG-76 00:00 TEST DRIVE COMMAND SEC 00e2 € 
2869 eSBTTL TEST DRIVE COMMAND e 
2870 
2871 011706 122737 000101 055154 TESTDV: CHPF @°A,OPROO1 CHECK If ALL DRIVES ARE TO BE TESTED 
287? 011714 001027 BNE 10$ 3"0, DO SPECIFIC DRIVE 
2873 011716 105037 001626 CLEP DRYCHT 7CLEAR DATVE CCUBT € 
2874 011722 005004 CLR R4 sCLEAR DRIVE COUET 
2°75 011724 016405 001520 1$: nov PRLET(R4), RS sCET PARAWETER BLOCK ADDRESS 
2876 011730 032765 000001 000014 BIt GORVUSE,P.PRST(RS) CHECK TF ORIVE IW USE € 
2877 011736 001004 BNE 2$ 3VES, GO 70 BERT CAIVE 
2878 011740 004737 013250 JSR PC, TEST 360 TEST DRIVE 
2879 011744 105237 001626 IWce ORVCHT sTUCRENEST DRIVE COUNT q 
2880 011750 005724 2$3 TST (R4)¢ ADDRESS WERT ORIVE (ADD 2) 
2881 011752 022704 000020 cwp #20,R4 3CHECK Tf FIBTSHEC 
2882 011756 001362 BNE 1$ 380, SET UP BKEXT DRIVE < 
2883 011760 105737 001626 TSTe8 DRYCNT sCHECK If ANY DRIVE IW ASSICHWERT SEQUENCE 
2864 011764 001032 BRE 15$ #VES, RETORA 
2885 011766 104401 055476 TYPF ,0PRO13 3TYPE “ALL ORIVES CORREBTLY UNDES TEST?" € 
2006 011772 000430 BR 15$ PRETURD 
2887 
2868 011774 113704 055154 10$: wove OPROO1,R4 sSTOKE OBTVE HUPBER € 
2889 012000 006304 ASL R4 MULTIPLY DRIVE BUNBER BY 2 
2890 012002 016405 001520 nov PBLFT(R4),RS 3CET PARAMETER ADDRESS 
2891 012006 032765 000001 000014 BIT @ORVUSE,P.PRST(RS) ;CHECK TP CRIVE ASSIGHEC q 
2892 012014 001003 BRE 11$ 3YES, PRINT CRPIVE ALREADY ASSIGNEC 
2893 012016 004737 013250 JSR PC, TEST 3CO TEST DRIVE 
a 2094 012022 000414 BR 15$ sRETURD q 
5 
2896 012024 013737 001450 177776 11$: mov RFPRI,PS sLOCK OUT REO6 INTERRUPTS 
e@ 2897 012032 152737 000060 055154 BIS® #60,0PR001 MAKE BUMPER ASCIZ q 
2898 012040 104401 055137 TYPE ,OPROOO PTYPE “DRIVE W ALREADY ASSICHED?® 
2899 012044 104401 055205 TYPE ,OPRO04 
2900 012050 005037 177776 CUR PS sALLOW RKOG INTERRUPTS < 
2901 012054 012605 15$: nov (SP)¢,R® PRESTORE RS 
2902 012056 012604 nov (SP)o,R4 ZPESTORE 04 
e 2903 012060 000207 RTS Pc sRETURD q 
2 
2905 eSBTTL CHANGE PAPAWETERS COMPAND 
e@ 2906 q 
2907 012062 122737 000101 055154 PARMDY: CHRP #°A,OPROC1 sCHECK IF PARAMETERS FOR ALL DRIVES 
2908 012070 001020 BWE 10$ u0, DG SPECIFIC CAIVE 
2909 012072 005004 CLR R4 sCLEAR DRIVE COURT q 
2910 012074 016405 001520 15: mov PALET(R4) RS #CET PARAWETER PLCCE ADDRESS 
2911 012100 004737 015756 JSR PC, PAPRM ZASK POR PAPAPETERS 
c 2912 012104 032766 000001 000014 BIT @DkVUSE,P.PRST(RS) ZCHFCE Tf CRIVE IW USE q 
2913 012112 001002 BNE 2$ 3VES, GO T0 BEXT DRIVE 
2914 012114 004737 013250 JSR PC, TEST 3CO TEST DRIVE 
@ 2915 012120 005724 2$3 TST (R4)¢ ADDRESS WEXT OPIVE (ADD 2) q 
2916 012122 022704 000020 cup #20,R¢ 3CHECK If FIBTSHEC 
2917 012126 001362 BNE 16 380, SET OP BEXT DRIVE 
@ 2918 012130 000415 BR 15$ sPETURN q 
2920 012132 113704 055154 10$: wove CPkOO1,P4 ZSTCHE DRIVE BUPEFR 
i 2921 012136 006304 ASL R4 MULTIPLY OPIVE BUMPED BY 2 € 
2922 012140 016405 001520 MOV PRLFT(R4), RS 3CET PARAMETER ACURFSS 
2923 012144 004737 015756 JSR PC, PARM 3CET WEW PARAMETERS 
° 2924 012150 032765 000001 000014 BIT @DRVUSE,P.PRST(RS) 3CHECK IF CRIVE I& USE £7 <q 
© <q 
— 
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RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZROP-B8 


OZR6PR.P11 


2925 
2926 
2927 
2928 
2929 
2930 
2931 
2932 
2933 
2934 
2935 
2936 
2937 
2938 
2939 
2940 
2941 
2942 
2943 
2944 
2945 
2946 
2947 
2948 
2949 
2950 
2951 
2952 
2953 
2954 
2955 
2956 
2957 
2958 
2959 
2960 
2961 
296? 
2963 
2964 
2965 
2966 
2967 
2968 
2969 
2970 
2971 
2972 
2973 
2974 
2975 
2976 
2977 
2978 
2979 
2980 


012156 
012160 
012164 
012166 
012170 


012172 
012200 
012202 
012206 
012210 
012214 
012222 
012224 
012232 
012236 
012240 
012244 
012246 
012252 
012254 
012260 


012262 
012266 
012270 
012274 
012302 
012304 
012312 


012314 
012322 
012330 
012334 
012240 
012344 
012346 
012350 


01275? 
012360 
012362 
012366 
012370 
012374 
012402 
012404 
012410 
012414 
012416 
012422 


11-aUG-76 00:00 


001002 
004737 
012605 
012604 
000207 


122737 
001030 
105037 
005004 
016405 
032765 
001405 
052765 
105237 
005724 
022704 
001361 
105737 
001034 
104401 
000431 


113704 
006304 
016405 
032765 
001404 
052765 
000414 


013737 
152737 
104401 
104401 
005037 
012605 
012604 
000207 


122737 
001027 
105037 
005004 
016405 
032765 
001404 
004737 
105237 
005724 
022704 
001362 


013750 


000101 
001626 


001520 
000001 


002000 
001626 


000020 
001626 
055540 


055154 


001520 
000001 


002000 
001450 
000060 
055137 


055231 
177776 


000101 
001626 


001520 
000001 


012772 
001626 


000020 


055154 


000014 
000014 


000014 
000014 


177776 
055154 


055154 


000014 


1552 


588 711 
DROPOV: 


1$3 


2$3 


10$: 


11$: 


15$: 


e SBTTL 
STATDV: 


1$3 


2$3 


BWE 
JSR 
nov 
nov 
RTS 


MACY11 30€1046) C1-CEC-77 14315 PAGE 62 
CHANGE PARAMETERS COMMAND 


15$ sYES, RETURN 
PC, TEST 260 TEST ORTVE 
(SP)o,R* SRESTCHRE PS 
(SP)o,R4 SRESTORE #4 

Pc sRETUPE 


DPOP DRIVE COMMAND 


cupe 
BYE 
CURB 
CLR 
nov 
811 
BEG 
BIS 
Ince 
TST 
cup 
BWE 
TSTB 
BRE 
TYPE 
BR 


Movs 
ASL 
nov 
BIT 
BEQ 
BIS 
BP 


MOV 
BIse8 
TYPE 
TYPE 
CLR 
MOV 
nov 
RTS 


@°A,OPR001 SCHECK TF ALL DRIVES ARE TO BE DACPPED 
10$ 3NC, DG SPECIFIC CHIVE 

DRVCHT sCLEAR DRIVE COUNT 

ha SCLEAR DRIVE COURT 


PBLKT(R4) RS dCET PARAPETER BLOCK ADDRESS 
@ORVUSE,P.PRST(BS) sCHECR Tf CRIVE IW USE 


2$ 380, GO TO WERT ORIVE 
SDRPDRV,P.PRST(RS) ZINDICATE CRIVE IS TO BE DROFFED 
ORVCHT STECKRENEST DRIVE COUNT 

CR4)¢ ZADDEPSS WERT CRIVE (ADD 2) 
#20,R4 sCHECE TP FIBISHED 

1$ 380, SET UP BEXT DRIVE 

DRYCHT SCHECE TF ARY DRIVES AVAILIABLE 
15$ sYES, RETOUR 

7 OPRO14 STYPE °"80 DRIVES Iu USE? 

15$ sPETURD 

OPROO1,P4 sSTORE ORIVE BUPBER 

ka SPULTTIPLY DRIVE BOMPER BY 2 


POLET(R4), &* sCET PARAMETER ACTRESS 
SORVUSE,P.PRST(RS) ZCHECK IF OPIVE ASSIGNED 

11$ 3*O, PRINT DRIVE B BOT ASSICHED 
@ORPORV,P.PRST(PS) ZIBDICATE DRIVE IS TO BE DROFFED 
15$ sPETUPS 


REPRIZPS sLOCK OUT RFCE INTERRUPTS 
#60,0PR001 SPAKE BUMBER ASCIT 

2 OPROOO sTYPE “DRIVE W BCT PSSICHED?® 
7 OPROOS 

PS JALLGCW PKOG INTERRUPTS 

(SP) o,R5 SRESTCRE PS 

(SP)e,R4 SRESTORE R4 

Pc sPETUPRD 


GET DPIVE STATISTICS COMMAND 


CMwPA 
BWE 
CLRP 
CLR 
nov 
BIT 
BEQ 
JSR 
Iwce 
Tst 
CMP 
BNE 


#°a,0PROO1 sCHECK VF STATISTICS FOP ALL DRIVES 
10$ 3HC, DP SPECIFIC CRIVE 

ORUCHNT sCLFAR DRIVE COURT 

R4 SCLFAR DRIVE COURT 


PPLET(R4), KS sCET PAPAWETER PLCCKR ADCKESS 
SDRVUSE,P.PPST(RS) s;CHECK IF CRIVE IN USE 


2$ 3G, GO TO REXT DRIVE 

PC, STAT SCATHER STATISTICS 

ORVCNT sTACKEMPAT CRIVE CCUNT 
CR4)¢ sADDRESS WEXT DRIVE (ADC 2) 
#20,84 SCHECK IF FINISHED 

1s 3G, SET UP BEXT CRIVE 


SEC OLe4 


F7 











RE611/REOG PERFORMAWCE EXERCISER MAINDEC DZR6P-8 
OZR6PB.P11 11-AUG-76 00:00 


29861 012424 105737 001626 

2982 012430 001033 

2983 012432 104401 055540 

2984 012436 000430 

296* 

2986 012440 113704 055154 10$: 
2987 012444 006304 

2968 012446 016405 001520 

2989 012452 032765 000001 000014 

2990 012460 001403 

2991 012462 004737 0127772 

2992 012466 000414 

2993 

2994 012470 013737 001450 177776 11$: 
2995 012476 152737 000060 055154 

2996 012504 104401 055137 

2997 012510 104401 055231 

2998 012514 005037 177776 

2999 012520 012605 15$% 
3000 012522 012604 

3001 012524 000207 

3002 

3003 -S8TTL 
3004 

3005 012526 122737 000101 055154 wWRTEPK: 
3006 012534 001032 

3007 012536 105037 001626 

3008 012542 005004 

3009 012544 016405 001520 1$3 
3010 012550 032765 000001 000014 

3011 012556 001007 

3012 012560 112765 000020 000210 

3013 012566 004737 013750 

3014 012£72 105237 001626 

3015 012576 005724 283 
3016 012600 022704 000020 

3017 012604 001357 

3018 012606 105737 001626 

3019 012612 001436 

3020 012614 104401 055476 

3021 012620 0004323 

3022 

3023 012622 113704 055154 10$: 
3024 012626 006304 

3025 012630 016405 001520 

3026 012634 032765 000001 000014 

3027 012642 001006 

3028 012644 112765 000020 000210 

3029 012652 004737 013250 

3030 012656 000414 

3031 

3032 012660 013737 001450 177776 11$: 
3033 012666 152737 000060 055154 

3034 012674 104401 055137 

3035 012700 104401 055205 

3036 012704 005037 177776 


2 9 9 @ a! 


TSTe 
BNE 


MACY11 30(1046) O1-DEC-77 14315 PACE 63 


GET DRIVE STATISTICS COMMAND 


ORVCHT SCHECR Tf AWRY CRIVES AVAILIABLE 
15$ sYES, RETORE 

7 OPRO14 sTYPE "HO ORIVES Im USE? 

18$ sRETURG 

OPROO1,P4 sSTORE DRIVE HUPBER 

R4 SPULTTPLY DPIVE RUNBER BY 2 


PRLET(R4) FS 3GET PARAWETESR ACCRESS 
SDRVUSE,P.PRST(°S) sZCHECK TF DRIVE ASSIGNED 
11$ SPRIGT DRIVE B BOT ASSIGCHED 


PC, STAT 360 GATHER ORIVE STATISTICS 
15$ sPETORG 

RKPRI,ZPS sLOCK OUT RKOE IATERROPTS 
#60, 0PR001 SPARE BUMPER ASCII 

7 OPRO0O0 sTYPE “DRIVE B® NOT SSSICGHED?® 
7 OP ROOS 


PS sALLGW PKOG INTERRUPTS 


CSP)e,R5 sRESICRE RS 
(SP) o,R4 SRESTORE R4 
Pc sRETURS 


WRITE PACK AND TEST COMPARD 


cwrs 
BRE 
CLRP 
CLR 
nov 
BIT 
BNE 
MOVR 
JSR 
I®CB 
Tst 
cup 
BRE 
TSTe 
BEG 
TYPE 
BR 


wOVB 
ASL 
MoV 
BIT 
BRE 
move 
JSE 
BP 


vov 
BIsP 
TYPE 
TYPE 
CLE 


$°A,OPROO1 sCHECR TF ALL DRIVES ARE TO BE TESTED 
10$ 3RC, DOC SPECIFIC CRIVE 
ORVCUNT sCLEAP DRIVE COURT 


R4 sCLEAP DRIVE COURT 

PBLFT(R4) RS sCET PAPAWPETER BLCCR ADDRESS 
@ORVOSE,P.PRST(PS)  ;CHECR ITF CRIVE IW USE 
2$ sYES, GO TO MEXT CRIVE 
SBIT4,P.ASSHCRS) 3SET FLAC POR WRITE PACK 


PC, TEST 260 ASSTGH DATIVE 

DRVCNT STSCHFERPOT DEIVE CCONT 

(R4)¢ ZRADDRESS WERT DRIVE (ADD 2) 
#20,24 sCHPCR TF FINISHED 

1$ 3¥O, SET UP KEXT COPMAND 

DRVCUT SCHECE TF ANY DRIVES KOT TB USE 
15$ 380, PETUPA 

7 OPRO13 STYPE @ALL DRIVES COKRENTLY UNDER TEST" 
15$ sPETURD 

OPROV1,R4 sSTORE DRIVE NUPBER 

k4 SVULTIPLY ORIVE NUMBER BY 2 
PBLET(R4),R* dGET PARAPETER ADDRESS 


@ORVUSE,P.PPSTCPS) s;CHECK IF DRIVE ASSIGNED 
11$ SYES, PRIWT DRIVE ALKEADY ASSIGHET 
#BIT4,P.ASSHC(RS) 3SET FLAG FCP WRITE PACK 


PC, TEST 260 ASSIGH DEIVE 

15$ sPETURN 

REPRI,PS gLOCK OUT RKOE TATERKUPTS 
#60,0PR001 sVAFE NOMBEF ASCIT 

7 OPROOO STYPE “DRIVE ® ALPEADV ASSICHED?® 
@ OPROO4 

Ps sALLCW PKOG INTERRUPTS 





G7 


i 








REG11/RKO6 PERFORMANCE EXERCISER “ATHDEC DZRE6P-B MACYL1 30(1046) O1-CEC-77 14315 PAGE 64 
DZREPR.P11 11-AUC-76 00:00 WRITE PACK AND TEST COMMARD SEC 0086 
3037 012710 012605 15$% nov (SP )¢,R5 JPESTORE FS 
3036 012712 012604 nov (SP po, R4 SRESTORE R4 
—* 012714 000207 ats Pc sPETURE 
040 


H7 








RF611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PB.P11 


3041 
3042 
3043 
3044 
3045 
3046 
3047 
3048 
3049 
3050 
3051 
3052 
3053 
3054 
3055 
3056 
3057 
3058 
3059 
3060 
3061 
3062 
3063 
3064 
3065 
3066 
3067 
3068 
3069 
3070 
3071 
3072 
3073 
3074 
3075 
3076 
3077 
3078 
3079 
3080 
3061 
3082 
3083 
3084 
3085 
3086 
3087 
3088 
3089 
3090 
3091 
3092 
3093 
3094 
3095 
3096 


012716 
012722 
012730 
012734 
012740 
012744 
012752 
012760 
012764 
012770 


012772 
012776 
013004 
013010 
013016 
013024 
013030 
013034 
013040 
013044 
013046 
013052 
013056 
013062 
013064 
013070 
013074 
013100 
013102 
013106 
013112 


013116 
013122 
013126 
013132 
013136 
013142 
013146 
013152 
013156 
013162 
013166 
013172 
013176 
013202 
013206 
013212 
013216 
013222 
013226 
013232 
013236 


11-AUG-76 00:00 


013746 
013737 
005065 
105065 
005065 
116537 
152737 
104401 
104401 
000405 


013746 
013737 
104401 
116537 
152737 
104401 
004737 
004737 
104401 
010546 
062716 
004737 
104401 
010546 
06 2716 
004737 
104401 
010546 
062716 
004737 
104401 


016546 
004737 
104401 
016546 
004737 
104401 
016546 
004737 
104401 
016546 
004737 
104401 
016546 
004737 
104401 
016546 
004737 
104401 
016546 
004737 
104401 


177776 
001450 
000014 
000210 
000212 
000000 
000060 
055427 
055251 


177776 
001450 
055615 
000000 
000060 
055427 
027060 
043072 
055673 


000152 
054344 
055715 


000160 
054344 
055742 


000166 
054344 
055764 


000176 
054302 
056017 
00017? 
054302 
056033 
000174 
054302 
056047 
000200 
054302 
056073 
000202 
054302 
056117 
000204 
054302 
056165 
000206 
054302 
001165 


177776 


055446 
055446 


177776 


055446 
055446 
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DROP DRIVE AND GATHER STATISTICS POUTINES 
eSBTTL DPOP DRIVE AND CATHER STATISTICS ROUTINES 


DROP: nov 
nov 
CLR 
CLRB 
CLR 
nove 
BISP 
TYPE 
TYPE 
BR 


STAT: “ov 
“OV 

STATOO: TYPE 
wove 
BTSB 
TYPE 
JSR 
JSR 
TYPE 
MOV 
aDD 
JSR 
TYPE 
nov 
400 
JSR 
TYPE 
Mov 
adDd 
JSR 
TYPE 


MOV 
JSR 
TYPE 
“ov 
JSR 
TYPE 
Mov 
JSR 
TYPE 
NOV 
JSR 
TYPE 
MoV 
JSR 
TYPF 
nOV 
JSR 
TYPE 
wov 
JSh 
TYPE 


PS,-(SP) sSTORE PSW 
REPRIZPS sLCCK CUT TTY ANC KEOG INTERRUPTS 
P.PRSTCRS) sCLEAR PROGRAM STAUS PECISTER 
Po ASSH(RS) SCLEAR ASSICHPERT CODE 
PeERR(RS) SCLEAR ERRCR PLACES 
P.DRUNCRS),OPRO11  3LOAD DRIVE ROPBER 
#60,0PR2011 SMAKE IT ASCII 
7 OPRO10 sTYPE “ORTVE F RAS BEEN DROPPED 
7 OPRO06 3 PEON TEST SEQUENCE® 
STATOO 260 PRINT STATISTICS 
PS,-(SP) sSTOKE PSW 
REPPI,PS sLOCK COT TTY ANC KROG INTERROPTS 
/0RVSTT 3**DRIVE STATISTICS 
P.DRVBCRS),OPRO11 ZJLGAD DRIVE SUMNBER FOR PRIBT CUT 
#66, 0PR011 sMARE IT ASCIT 
7OPR010 sTYPE “DRIVE ve 
PC, PRISER SPRINT DRIVE AND PACK SERIAL WOUPGERS 
PC, PRITIN sPRIBT TIME IP CLOCK AVAILIABLE 
@STToal sTYPE "ORDERS PERPCFNED® 
RS 4-(SP) sCET PARAMETER BLCCR ADDRESS 
@P.RODR, (SP) SCALCULATE ADDRESS FOR PRIBT OUT 
PC,$DB2D0 sCONVERT TO ASCII 
@STTO02 sTYPE “WORDS WHITTER*65K@ 
RS,-(SP) 26ET PARAMETER BLCCR ADDRESS 
GP. WUPTS2,(SP) sZCALCULATE ADDRESS FOR PRIBT OUT 
PC,$DR2D sCONVERT TC ASCII 
@STT003 sTYPE “WORDS READ*6SK® 
RS,-(SP) 3CET PARAWETER BLOCK ADDRESS 
#P. NRDO2,( SP) SCALCULATE ADDGESS FOR FKIRT CUT 
PC,$DB2D sCONVERT TO ASCII 
a STTOO4 sTYPE “SOFT DATA ERRORS®* 

"Ecce 
P.SFCC(RS),-(SP) sSTCRE SOFT ECC ERROR COUNT 
PC,$SB20 SCONVERT TO DECIMAL 
@STTOOS STYPE “REREAD® 
P.SRROCRS),-(SP) 3SAVE SOPT REREAD CORRECTABLE 
PC,$SP20 sCONVERT TC CECIPAL 
a STTO06 sTYPE “OFFSET® 
P.SOFFCPS),-(SP) 3SAVE SOFT CPFSET CORRECTABLE 
PC,$SB20 sCONVERT TO DECTRAL 
@STT007 STYPE “HARD CATA EFRECRS® 
P.HARD(PS),-(SP) 3SAVE RARD CATA ERPORS 
PC,$SR2D sCORVERT TO DECIMAL 
@ STTO08 dTYPE “SEEK INCOMPLETES 
PoNSKICPS),-(SP) TYEE BOMBER CP SEEK INCOMPLETES 
PC,$S820 SCONVERT TO DECIMAL 
a STTO09 STYPE “OPERATION INCOMPLETES” 
P.NOPT(RS),-(SP) 3SAVE RUPBER CF CPERATION INCCPELETES 
PC, $SB20 sCONVERT TO DECTHAL 
@STT010 sTYPE “OTHER ERRORS® 
P.WER(RS),-C(SP) JSAVE NUMBER CF CTHER ERRORS 
PC,$ S820 sCCHVRET TC CECTRAL 
7SCRLF STYPE <CRO<LF> 


SEG C087 


77 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PB.P11 11-AUG-76 00:00 


3097 013242 012637 177776 
3098 013746 000207 
3099 


nov 
RTS 


MACY11 30€1046) O1-DEC-77 14315 PACE 66 
DROP DRIVE AND GATHER STATISTICS ROUTINES 


CSP )o,PS 
Pc 


SRESTORE PSW 
sRETORD 


a7 


| @ @ © @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @'! 


REK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PB.P11 11-AUG-76 00:00 IRMITIATE DRIVE ASSICHMENT SEQUENCE 
ey eSBTTL INITIATE DRIVE ASSICHMERT SEGUENCE 
101 
310? 013250 116546 000710 TEST: HNOVB Po ASSHC(RS),-(SP) 2SAVE ASSICHMERT CODE 
3103 013254 010446 nov R4,-(SP) sSTOSE R4 OW STACK 
3104 013256 010346 nov R3,-(SP) sSTORE #3 OW STACK 
3105 013260 010503 uov R5,R3 SLOAD PARAMETER BLOCK ADDRESS INTC RI 
3106 013262 062703 000122 adDd #P.ROPT, RI SCALCOLATE PECINBING OF STATISTICS ANC 
3107 3 ERROR AREA 
3108 013266 010504 nov RS, R4 SLOAD PARAWETER BLOCK ADORESS INTC R4 
3109 013270 062704 000237 adD #P.EXAR,R4 SCALCULATE EBD OF STATISTICS ABD 
3110 3 EBRGR AGEA 
3111 013274 005023 1$3 CLR CR3)¢ SCLEAR STATISTIC AND ERROR AREA 
3112 013276 020304 cme R3,R4 sCHECK IF FINISHED 
3113 013300 001375 BRE 1$ 380, CONTINUE 
3114 013302 116504 000000 wOvB PoDRVNCRS),R4  ZSTOKE ORIVE ROMBER 
3115 023306 156437 001510 001507 BISB INTMSK(P4),0.0VER sSET UP FOR CVEPLPPPING SEEKS 
3116 013314 012603 “ov (SP )¢,R3 SRESTORE P3 
3117 013316 012604 nov (SP) o,R4 SRESTCHE R4 
oe 013320 112665 000210 nOvB (SP)¢,P.ASSNCPS) RESTORE ASSIGRHENT CODE 
3120 013324 105065 000117 TESTI: CLRB P.ECHP(RS) SCLEAR ECC CCHPARE FLAG 
3121 013330 152765 000001 000210 BISe® #BITO,P.ASSRHCRS) 3SET GEAD STATUS CCHMARD FLAC 
3122 013336 052765 000001 000014 BIS SDRVUSE,P.PRSTC(RS) 3SET DRIVE IN USE 
3123 013344 112765 000141 000001 move SROSTAT,P.CMHDC(RS) 3;READ ALL DRIVE STATUS 
3124 013352 112765 000141 000123 move @RDSTAT,P.RCHDCRS) 
3125 013360 004037 050706 JSR RO,G.PUSH SERQUEUP PARAMETER PLOCK It 
3126 013364 001324 crurro 2ECCeuauo INITIATION QUEUE 
3127 013366 000207 RTS Pc sRETURD 
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K7 


a a a 








4 RK611/RKO6 PERFORMAWCE EXERCISER MAINDEC OZR6P-B 


DZR6PR.P11 


3128 
3129 
3130 
3131 
3132 
3133 
3134 
3135 
3136 
3137 
3138 
3139 
3140 
3141 
3142 
3143 
3144 
3145 
3146 
3147 
3148 
3149 
3150 
3151 
3152 
3153 
3154 
3155 
3156 
3157 
3158 
3159 
3160 
3161 
3162 
3163 
3164 
3165 
3166 
3167 
3168 
3169 
3170 
3171 
3172 
3173 
3174 
3175 
3176 
3177 
3178 
3179 
3180 
3181 
3182 
3183 


013370 
013376 
013400 
013406 
013414 
013422 
013426 
013432 
013436 
013444 
013446 
013454 
013462 
013470 
013476 


013500 
013506 
013514 
013522 
013530 
013534 
013536 


013540 
013546 
013550 
013556 
013564 
013566 
013574 


013600 
013606 
013610 
013616 
013624 
013626 


013634 


013640 
013646 
013654 
013662 
013670 


013672 
013700 
013702 
013710 


013716 
013724 


11-AUG-76 00:00 


132765 
001460 
142765 
016565 
042765 
006265 
006265 
006265 
032765 
001415 
116565 
112765 
112765 
152765 
000414 


116565 
112765 
112765 
152765 
004037 
001324 
000207 


132765 
001414 
142765 
032765 
001330 
052765 
000137 


132765 
001431 
142765 
032765 
001005 
052765 


000137 


116565 
112765 
112765 
152765 
000717 


132765 
001455 
142765 
152765 


012765 
116565 


000001 


000001 
000054 
100007 
000224 
000224 
000224 
000200 


000123 
000103 
000103 
000004 


000123 
000111 
000111 
000002 
050706 


000002 


000002 
000200 


002000 
024766 


000004 


000004 
000100 


004000 
024766 
000123 
000113 
000113 
000100 
000100 


000100 
000010 


001000 
000123 


000210 


000210 
000224 
000224 


000036 


000135 
000001 
000123 
000210 


000135 
000001 
000123 
000210 


000210 


000210 
000036 


000212 


000210 


000210 
000036 


000212 


000135 
000001 
000123 
000210 


000210 


000710 
000210 


000004 
000135 
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DRIVE ASSIGRMENT SEQUENCE 


eSBTTL DRIVE ASSIGNMENT SEQUENCE 


ASNOR™: BITR 


ASN1$: MOVB 


ASN2$: MOVE 


ASH3$: JSR 


ASN4$: BITB 


15$: BITB 


16$: nove 


185 BITB 


SBITO,P.ASSHC(RS) SCHRECK IP READ STATUS 

ASH4S$ 3G, CHECK Tf STAST SPINDLE 
SBITO,P.ASSHC(PS) SCLEAR READ STATUS COMMAND ISSUET 
PoALL(RS ),PoSERL(RS) ZSTORE SERIAL BUMBFR 
#°C<M.SERD,P.SERL(RS) PREEP SERTAL BUMBER 


P.SERLC(RS) sSHTFT 3 BITS HIGHT 
P.SERL(RS) 

P.SERL(RS) 

@DROY,P.DS(RS) sCHECK TF DPIVE SEACY 
ASN2S$ 30, ISSUE START SPINDLE 


P.RCMDCRS ),P.LCMD(RS) sSTORE PREVICUS CONMARD 
SPACK,P.CWHDCRS) 3ISSUE PACK ACKECULEDCE 
#PACK,P.RCHD( RS) 

@BIT2,P.ASSHCRS) SET PACK ACKBOBLEDGE PLAG 
ASH3$ STSSUE PACK ACKNGWLEDGE AND WAIT 


Pe RCHD(RS),P.LCMDCES) sSTORE PREVICUS CCHMARD 
SSRTSPL,P.CMND(PS) ZISSUE START SPINDLE 
SSRTSPL,P.RCHDCRS) 
SBIT1,P.ASSHCRS) SET START SPIROLE FLAC 
RO,0.PUSH SEMQUEUF PAPFAPETER BLOCK 18 

3 CCHMAND IMITIATICN QUEUE 
PC sRETURD 


teenie canna sCHECK If START SPINDLE 

15$ 3¥O, CHECK IF PACK ACKNOWLEDGE 
GBITL,P.ASSHC(RS) SCLEAR START SPIBDLE FLAC 
@OROY,P.DS(RS) s;CHECE TF OPIVE GEACY 
ASWI$ SYES, ISSUE PACK ACKNOWLEDGE 
#BITLO,P.ERR(RS) SFT ORIVE BOT READY APTER START SPIRDLE 
ABNORY SREPCRT ERROR 


@BIT2,P.ASSHCPS) sCHECK IP PACK ACKROWLEDCE 

18$ 380, CHECK IF RECAL 

@BIT2,P.ASSH(RS) SCLEAR PACK ACKBCWLEDGE FLAG 

#¥¥,P.0S( #5) sCHECK YF VCLUMF VALID IS SET 

16$ sYES, CHECK IF PACK IS TO BE WRITTEN 

GBIT11,P.ERR(RS) SET VOLUMF VALID ROT SET AFTER PACK 
3 «ACKNOWLEDGE 

ABNORM sPEPOPT ERROE 


PoRCMD(RS),P.LCMD(RS) sSTORE PREVICUS COMMARD 
@RECAL,P.CHND( RS) Z1SSUF RECAL 
#RECAL,P.RCHD( RS) 

SGP IT6,P.ASSH(RS) 3SET RECAL ISSUED 

ASH3$ 


eins cis sCHECK IP PECAL 
23$ 3¥O, CHECK TF REACT PACK SERIAL HUPBER 
SBIT6,P.ASSH(RS) SRESET KECAL ISSUED 
@BIT3,P.ASSNCRS) Z3SET ASSIGNMENT CODE FOR PACE 
3 SERIAL NOUMPER READ 
#1000,P.SECT(RS) 3 TRACK 2 SECTCR 0 
P.RCMD(RS),P.LCWDCRS) sSTORF PREVICUS COMMAND 


47 











ESS ee 


RE611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6P8.P11 


3184 
3185 
3186 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
3222 
3223 
3224 
3225 
3226 
3227 
3228 
3229 
3230 
3731 
3232 
3233 
3234 
3235 
3736 
3237 
3238 
3239 


013732 
013740 
013746 
013754 
013762 
013770 
013776 
014002 


014004 
014010 
014012 
014016 
014022 


014024 
014030 
014032 


014034 
014042 
014044 
014050 
014052 
014056 
014064 
014072 
014100 
014106 
014114 
014122 
014124 
014132 
014136 
014140 
014144 
014146 
014152 
014156 


014162 


014166 
014170 
014176 
014200 
014202 
014206 
014212 
014216 
014220 
014222 
014224 
014226 
014232 
014236 


11-AUG-76 


112765 
112765 
012765 
012765 
012765 
016565 
005737 
001010 


004037 
014024 
005037 
004737 
000642 


004037 
001320 
000207 


032777 
001542 
105765 
001444 
105065 
116565 
016565 
016565 
016565 
116565 
132765 
001003 
052765 
005737 
001332 
004037 
014024 
005037 
004737 
000137 


004037 


015074 
132765 
001424 
010446 
016504 
012465 
012465 
005724 
005714 
001423 
012604 
004737 
104401 
004737 


000121 
000121 
177774 
000632 
000632 
000004 
001320 


022114 


177776 
022532 


050706 


040000 
000211 


000211 
000123 
000124 
9001 26 
000130 
000122 
000010 


000200 
001320 


022114 
177776 
022532 
013530 


024506 


000010 


000010 
000226 
000230 


022316 
055562 
012716 


000001 
000123 
000012 
000002 
000124 
000126 


165076 


000001 
000002 
000004 
000012 
000121 
000210 


000014 


000210 
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DRIVE ASSTGHMENT SEQUENCE S&¢ 0091 
20$: wove SPODATA,P.CMHDCRS) 3LOAD REAG COMPARD FOR PACK 
MOVB SRDDATA,P.RCHDCRS) 3 SERTAL RUMBER 
nov €-4,P.UCC RS) sLCAD WORD CCUNT PCR THE FIPST PCOR uCAtS 
nov #410.,P.CYLN(RS) SET CYLINDER TO 410 
MoV #410.,P.RCYL(RS) 
nov P.SECT(RS),P.RSECC(RS) gSTORE THACK ABD SECTCR 
Tst BWAITQ SCHECK YF BUFFER WATT QUEVE IS ERFTY 
BNE 22$ 3¥O, ENQUEVE PARAPETER BLOCK IB BUFFER 
3 WAIT QUEUE 
JSK RO,BUFFAL SALLCCATE BUFFER 
22$ 3NOT EROUCH ROCH RETURN 
CLR PS JALLOW RKOG INTERRUPTS 
JSR PC,LODATA sCLEAR PUPFFESR 
BP ASH3$ sISSUE COMMARD 
22$3 JSR RO,Q.PUSH sPUT PARAWETER BLOCK OW BUFFER 
BWATTQ 3 WATT QUEUE 
RTS ec sPETURD 
23$8 BITt #SW14,@SuR sCHECK TS CYCLE GB OPERATION 
BEG 43$ 3NO, COMTINUE BITE ASSIGHMERT PRCCESS 
TSTB P.SEEK(RS) SCHECK If SEEK TO PREVIOUS POSITICH 
BEQ@ 28$ 380, SERVICE INTERRUPT 
CLRB P.SEEK(RS) sCLEaR FLAG 
wove P.RCMDCRS),P.CMND(RS) ZREISSUE LAST CONPARD 
MoV PoRCYLCRS ),P.CYLNC(RS) ZLOAD CYLIBCER ADDRESS 
MoV P.RSEC(RS),P-SECT(RS) sLOAD FREVICUS TRACK AND SECTOR 
“OV P.RUCCRS),P.UCCRS) 3LOAD PREVICUS BCRD COUNT 
nOVB P.RDPTCRS),P.DPATC(RS) ZLOAD PREVICUS PATTERR 
BITB @BIT3I,P.ASSNCRS) 3CHECK IF READ PACK SERIAL NUMBER 
BNE 25$ SYES, DO ROT SET WRITE BEFORE BRITE CHECE 
BIS aw.UCr,P. pRST(RS) sSET WRITE BEFCRE WRITE CHECK 
25$3 Ts? BWATTQ sCHECF IF ANY DRIVE WAITING FOR BUFFER 
BNE 22$ sYES, EFQUEUVE PARAMETER BLOCK 
JSK RO, BUFFAL 260 ALLOCATE BUPFER 
22$ sNOT ENOUGH ROCY RETURS 
CLR PS sALLOV RKOG INTERRUPTS 
JSR PC,LODATA 260 LOAD DATA 
JMP ASK3$ 3GC ISSUE CCHRARL 
28$: JSR RO, CHKADD SCHECK SECTOR, TRACK, CYLINDER, 
3 WCRD COURT, ABD BUS ADDRESS 
60$ ZFRRCR RETOUR 
BITB ———— sCRECK IF EAD PACK SERIAL NUMBER 
BEQ 35$ 3NO, RELEASE PUFFER 
mov R4,-(SP) sSTOKE R4 OR STACK 
nov P.BALC(RS),P4 sLCAC h4 TC GET PACK SERIAL NUNPEF 
MOV (R4)¢,P.PESPCRS) 3GET PACK SERIAL BRUMBER 
MoV (R4 De, PPK SRe? (RS) 
151 (R4)¢ ZADJUST R4 TC ADOPESS ALLIGSNEBT IBDICATICK 
TST (R4) sCHECK TF DATA PACK 
BEQ 37$ sYES, CONTINUE 
30$: uor (SP )*,R4 SRESTORE R4 
JSK PC, PUFREL SRELEASE BUPFES 
TYPE 7OPRO15 STYPE “ALLICMPERT PACT IB DPIVE" 
JSR Pc, DROP 260 OPROP Dalve 








©@ 
RR611/RKO6 PERFORMANCE EXERCISER PATNDEC DZR6P-P PACY11 30(1046) Oi-LEC-77 14:15 PACE 70 

@)} OzR6Pe.P11 «=: 11-80-76 00:00 DRIVE ASSTGNNENT SEQUENCE SEG 0092 ( 
3240 014242 004737 022016 JSR PC, CETBOF 3CO GET BUFFER FOR WERT CCHPAWD 

eo — 014246 000207 RTS Pc sPETUPN ( 
3243 014250 032765 000700 000014 35$: BIT §W.WCK,P.PRST(RS) jCHFCK TF WRITE CHECK HAS BFE® ISSUED 

€ 3244 014256 001406 BFG 38$ sVES, GC RELEASE PUFFER ( 
3245 014260 042765 000200 000014 BIC #¥.WCF,P.PRST(RS) sCLEAP WRITE BEFORE WRITE CPECK 
sae 014266 000137 013530 JMP ASN3$ 360 ISSUE COMMAND ‘ 

4 

© 3248 014272 012604 37$: MOV (SP)o,k4 sRESTORE P4 
3249 014274 004737 022316 38S: = JSR PC, BUPREL sPELEASE BUPFER 

eq 3250 014300 032765 002000 000014 BIT #ORPORV,P.PRST(RS) 3CRECK IP DROP DRIVE ( 
3251 014306 001402 BEG 40$ sNO, SEFK TC PREVIOUS POSITION 

° ares 014310 000137 015626 JMP wvis #60 CROP DRIVE , 
3254 014314 112765 177777 000211 40$: MOVB #-1,P.SEER(RS) sSET FLAG 
3255 014322 016565 000136 000002 MOV P.LCYL(RS),PeCYLNC(RS) LOAD LAST CYLINDER 

é 3256 014330 01656© 000140 00004 mov P.LSEC(RS),P.SECTCRS) LOAD LAST SECTOR AND TRACK ( 
3257 014336 112765 000117 000001 MOVE §SEEK,/P.C¥ND(RS) 3ISSUE SEEK 

° —* 014344 000137 013530 JMP ASNIS 9CO SEEK TO PREVICUS POSITION ‘ 
3260 014350 132765 000010 000210 43$: BIT8 g01T3/P.ASSH(95) 3CHECK IF MEAD PICK SERIAL NUMBEF 
3261 014356 001002 BNE 45$ sYES, SET UP FOR READ 

@ 326? 014360 000137 015076 JMP WRTVER sCHECK TF WRITE PACK ( 
3763 
3264 014364 132765 000200 000210 45$: BITS $$ @BIT7,P.ASSNH(RS) >CHECK IF RECAL SND RETRY 

€ 3265 3 READ OF PACK SERIAL NUMBER ( 
3266 014372 001427 BEQ 48s oO, SERVICE READ OF PACK SERIAL HUMBER 
3267 014374 142765 000200 000210 BICB §PIT7,P.ASSH(FS) ;RESET BECAL PCR REREAC OF PACK SERIAL BC. 

& 3268 014402 116565 000123 000135 MOVB «=P. RCMD(RS),P-LCPO(RS) sSTORE LAST COMMAND ( 
3269 014410 016565 000124 000136 MoV P.RCYL(RS ),PoLCYL(RS) sSTORE LAST CYLINDER 
3270 014416 016565 000126 000140 MoV P.RSEC(RS),P.LSEC(RS) STORE LAST SECTOR ABD TRACK 

€ 3271 014424 016565 000130 000142 MOV P.RWCCR®),P.LWCC(RS) sSTORE LAST BCRE COURT ( 
3272 014432 062765 000002 000126 ADD #2,P.RSEC(RS) 3TRY WEXT 16-BIT FORMAT SECTOR 
3273 014440 016565 000126 000004 MOV P.RSEC(R! ),P.SECT(RS) JSTORE SECOTOR TO BE READ 

o * 014446 000137 013732 JMP 20$ 3GO ISSUE RFAT CF PACK SERIAL BUPPER ( 
3275 * 
3276 014452 142765 000010 000210 46$:  BICR  gPIT3,P.ASSN(PS) 3CLEAR PFLAG 

€ 32777 014460 004037 024506 JSR RO, CHRADD dCHECK TF DATA TRARSFER CORRECT ( 
3278 014464 015074 60$ ZERRCR RETURD 
3279 014466 010446 MOV R4,-(SP) #STORE R4 

C 3280 014470 016504 000132 MOV P.RBAL(RS),R4 SLOAD R4 TO ADDRESS SERIAL RUPBER ( 
3281 014474 012465 000226 MoV (R4)*,P.PKSP(RS) sLOAD LEAST SIGKIFICANT BITS 
32862 > OF SERIAL RUPBFR 

€ 3283 014500 012465 000230 MoV (P4)¢,P.PRSRO2(P5) sLOAD MOST SIGNIFICANT BITS ( 
3264 + OF SERIAL NUMBER é' 
3285 014504 005724 TST (P4)¢ dADJUST R4 TO ADDRESS ALLIGHMENT IBDICATICEH 

€ 3286 014506 005714 TST (R4) sCHECK TF ALLIGHRENT PACK ( 
3287 014510 001245 BNE 30$ 3YES, DROP DRIVE 
3288 014512 012604 mov (SP)+,R4 PRESTORE P4 

€ 3289 014514 004737 022316 JSR PC, PUFREL pRELEASE RUPFFR ( 
3290 014520 132765 000020 000210 BITB 4 gBIT4,P.ASSNC(PS) sCHECK IF WRITE PACK 
3291 014526 001042 BNE 55$ sYES, SET UP PATTFRN AND ALLOCATE BUFFER 

€ 3292 014530 105765 000076 TSTB =—-_- Pe. RATE(RS) sCHECK TF READ CALY MODE ( 
3293 014534 001413 BEQ 52$ 3YES, START TESTING 
3294 014536 032765 004000 000036 BIT #WRL,P.DS(KS)  5ZCHECK IF WRITE LCCRED 

€ 3795 014544 001407 BEQ 52$ sO, START TESTING ( 








RE611/REO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-B 
ORIVE ASSIGNMENT SEQUENCE 


) OZR6PS.P11 


3297 014546 104401 
3298 014552 004737 
3299 014556 004737 
3300 014562 000207 


3302 014564 116537 
014572 152737 
3304 014600 104401 
3305 014604 104401 
3306 014610 004737 
3307 014614 004737 
3308 014620 104401 
J 3309 014624 004037 
3310 014630 001314 
3311 014632 000207 


3315 014634 
3316 014642 
3317 014644 
33186 014650 116565 
3319 014656 016565 
3320 014664 016565 
014672 016565 

3322 014700 112765 

3323 014706 112765 
- 3324 014714 052765 
3328 014722 005065 
3326 014726 005065 
3327 014732 005065 
3328 014736 005065 
3329 014742 105065 
3330 014746 013765 
3331 014754 042765 
3332 014762 001003 
014764 012765 
3334 014772 062765 
3335 015000 066565 
015006 005565 

3337 015012 066565 

3338 015020 005565 
7 3339 015024 005465 

3340 015030 013737 

3341 015036 005737 
J 3342 015042 001011 

3343 015044 004037 

3344 015050 015066 
5 015052 005037 
3346 015056 004737 
3347 015062 000137 


3349 015066 004037 
3350 015072 001320 
015074 000207 


032765 
001341 
005037 


- 


11-AUG-76 00:00 


055451 
012716 
022016 


000000 
000060 
055427 
055172 
027060 
043072 
001165 
050706 


004000 


177776 
000123 
000124 
0001 26 
000130 
000131 
000131 
000200 
000002 
000124 
000004 
0001 26 
000121 
001354 
000377 


000400 
000002 
000012 
000160 
000012 
000166 
000012 
001450 
001320 


022114 
177776 
022532 
013530 


050706 


055446 
0559446 


000036 


000135 
000136 
000140 
000142 
000001 
000123 
000014 


000012 
000012 


000012 
000152 
000156 


000164 


177776 


50$% 


52$% 


« SBTTL 
5552 


57$3 


5952 
60S: 


TYPE 
JSR 
JSR 
RTS 


MOVB 
BISP 
TYPE 
TYPE 
JSR 
JSR 
TYPE 
JSR 
avatlLa 
RTS 


MACY11 30€1046) 
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2OPRO12 STYPE “DRIVE WRITE LOCKED” 

PC, DROP sDROP ORIVE FROW TEST SEQUERCE 
PC, CETBUF sCET PUFFER FCR BEXT COPHANC 
pc sPETURN 


P.DRVR(RS),OPRO11L sLCAD CRIVE BUMPER 


#60,0PR0i1 gMAKE If ASCII 
70PRO10 sTYPE “DRIVE BUNBER BK UNDER TEST® 
7 OPPR003 
PC, PRISER SPRIBT DRIVE AND FACK SERTAL ROPBERS 
PC, PRITIN SPRINT TIME 
a SCRLF 
RO,Q.PUSH sPUT PARAPETER BLCCR IN DRIVE 
3 AVAILIABLE GUEUE 
pc sPETURS 


WRITE WHOLE PACK WITH RANDOW DATA 


#WRL,P.0SCRS) sCHECK TF WRITE LCCRED 
50$ 3YES, DROP DRIVE 
PS PALLOCW PROG IRTERPUPTS 


P.RCHD(FPS),P.LCHDCRS) sSTCRE LAST CCHMARD 
P.RCYLCRS),P-LCVL(RS) ZSTORE LAST CYLINDER 
PeRSEC(RS),P-LSEC(RS) sSTORE LAST TRACK APD SECTCE 
PoRWCCRS),P.LWCCR®) ZSTORE LAST BCRE COUNT 
@URTCAK,P.CHND(RS) #LOAD WRITE COMMAND 
@URTCHK,P.RCMDC(RS) 

@W.WCK,P.PRST(R5S) Z3SET WRITE BEFORE BRITE CHECK 


P.CYLB(PS) sCLFAR CYLINCES ADDRESS 
P.RCYLCPS) 

P.SECT(RS) SCLEAR TRACK ABD SECTOR 
P.RSEC(R5) 

P.DPATC(FS) sLCAC RABDOW FATTERR 


MAXBUP,P.WC(RS) ZLOAD WORD COUNT 

€377,P.WCCRS) SPAKE IT AN EVEN RUPBER OF SECTORS 
57$ sTF BOT ZERC USE THIS AS WORD CCURT 
#256.,P.UC( RS) ZTRABSFER AT LEAST 256 WORDS 
#2,P.NODR(RS) ZINCREMENT NUMBER OF ORDERS 
P.WC(CRS),P.-BWRTCRS) ZADD FUPBER CF WORDS WRITTER 

Po WWURTO2( FS) 
P.WCCRS),P.NRD(PS) 3ADD NOMBER CF WORDS READ 

P. D-26RS) 


P.WC(RS) SMAKE THE WORD COURT WECITIVE 
REPPI,ZPS sLCCK RFOG IATERKUPTS 
BWATTQ SCHECK TF COMMANDS WAITING FOR BUFFER 
$9$ SYES, ERQUEVE COMMAND IW BUFFER BAIT QUEUE 
RO, PUPFAL 360 ALLCCATF PUFFFR 
SNOT ENOUGH ROCH, EPQUEDE IN BUPFER WAIT CUELE 
PS SALLOW RKOG INTERRUPTS 
PC,LDDATA sLCAC BUFFER 
ASN3$ 360 ISSUE CCMMAND 
RO,Q.PUSH 3PUT PARAMETER BLCCR IN BUFFER 
3 WAIT GUEUVE 
PC sPETURN 


Br 











( 
RK611/R2KO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30€1046) O1-DEC-77 14315 PACE 72 
DZR6PB.P11 11-AUG-76 00:00 WRITE WHCLE PACK WITH RANDOP DATA SEC C094 ( 
3352 
3353 015076 132765 000020 000710 WRTVER: BITB — eo pec mat sCHECK IF WRITE PACK IW PROGPESS ( 
3354 015104 001001 BNE sVES, CONTIRUE 
3355 015106 000000 HALT 3 **8? PROCRAP PROBLEM 
3356 015110 004037 024506 1$: JSR RO, CHRADD SCHECE SECTOR, TRACK, CYLINDER, ( 
3357 3 WCRO COURT, ABD BUS ADDRESS 
3358 015114 015754 wv9s SPRRCR RETUPR ADLCFESS 
3359 015116 032765 000200 000014 BIT #W.UCK,P.PRST(RS) ZCHECK IF BRITE CHECK ISSUED ( 
3360 015124 001405 BEQ wvos sTES, CRECK FOR DROP DRIVE 
3361 015126 042765 000200 000014 BIC SU.UCK,P.PRSTC RS) ZCLEAR ISSUE WRITE BEFORE WRITE CRECK 
— 015134 000137 013530 JMeP ASH3S$ 3GO ISSUE WRITE CHECK ( 
6 ‘ 
3364 015140 032765 002000 000014 wvOS: BIT @DRPORV,P.PRST(RS) SCRECK IF DROP ORIVE 
3365 015146 001402 BEQ 10$ 200, CCHTINVE ( 
— 015150 000137 015616 Jmep 30$ sYES, TERMINATE PACK WRITING 
3368 015154 132765 000040 000210 10$: BITB ee sCHECK IF ERD CF PACK ( 
3369 015162 001402 BEQ 15$ 3G, CONTINUE 
—8 015164 000137 015640 JMP wv¥2s sYES, RETURN BUPFER ( 
1 
3372 015170 112737 177777 001502 15$: HOVB #-1,1.0SRL STEDICATE THAT AB IVTERRUPT HAS BEER ISSUED 
3373 015176 012762 000300 000000 “ov — — 260 SCAN FOR DRIVE THTEPRUPTS 
3374 015204 005037 177776 CLR ZALLOW PKOG INTERFUPTS ( 
3375 015210 116565 000123 000135 MOVB P_RCHD(RS)/P.LCHD CRS) sSTORE PREVIOUS CCHMARD 
3376 015216 016565 000124 000136 MOV P.RCYLC(RS),P.LCYLC(RS) gSTORE PREVICUS CYLIBCEF 
3377 015224 016565 000126 000140 nov P.RSEC(PS),P-LSEC(RS) sSTORE PREVIOUS TRACK AND SECTOR ( 
3378 015232 116565 000122 000144 MOVB P.RDPT(RS),P.LDPT(RS) ZSTORE PREVIOUS DATA PATTERS 
3379 015240 016565 000130 000142 nov PeRWCC(RS),P-LWC(RS) ZSTORE PREVICUS WORD COUNT 
3380 015246 016565 000026 000004 nov P.DTS(RS),P.SECTCRS) sLCAD REW SECTCR ABD TRACK ( 
3381 015254 016565 000026 000126 “ov P.DTS( RS), P-RSECC(RS) 
3382 015262 016565 000030 000002 MoV P.DCYL(R5),P.CYLNC(RS) sLOAD KEW CYLINDER 
3363 015270 016565 000030 000124 MOV P.DCYL(R5),PRCYL(RS) ( 
3384 015276 016565 000132 000010 nOV P.RPAL(PS),P.PALC(RS) sPETNITIALI7ZE BUS ADORESS ECE PCSSIELE 
3365 3 BAD SECTOR RECCVERY OW LAST CCPMAND 
3386 015304 052765 000200 000014 BIS #U.WCK,P.PRST(RS) ZSET TISSUE WRITE BEFORE BRITE CRECK ( 
3387 015312 016546 000002 mov P.CVYLN(RS),-(SP) sSTCRE CYLTACEF ADCKESS OW STACK 
33868 015316 006316 ASL (sP) SMULTIPLY CYLINDER BY 3 
3389 015320 066516 000002 ADD P.CYLN(RS),(SP) ( 
3390 015324 005046 CLR -(SP) sMAFE RCCY Ch STACK FOR TRACK 
3391 015326 116516 000005 MOVB PoTPCF(RS),(SP) sSTORE TRACK CB STACK 
3392 015332 061666 000002 ADD (SP ),2(SP) 24000 TRACE ( 
3393 015336 012716 000026 MOV #22-,(SP) sSTORE 22 ON STACK (MULTIPLIER) 
3394 015342 004737 054064 JS PC,SMULT SCALCULATE RUPBER OF SECTORS TRANSFERFEC 
3395 015346 012616 MOV (SP)+,(SP) STHROW AWAY MCST SIGNIFICANT BITS ( 
3396 015350 005046 CLR -(SP) sCLEAR LOCATICK FCR SECTOP 
3397 015352 116516 000004 wove PeSECTCRS),(SP) sSTCRF SECTCEK CCURT 
3398 015356 061666 000002 ADO (SP),2¢2P) SDETERMINE TOTAL NUMBER OF SECTORS TRANSFERFED ( 
3399 015362 012716 064740 MOV #©410.°%22.%7.90€27.%2.>,(SP) sSTORE NUMBER CF SECTCGPS OF CISE 
3400 015366 166616 000002 suB 2(SP),(SP) SDETERMINE RUPBFR CF SECTORS LEFT CR 
3401 3 OW PACF TC BE WRITTEN ( 
3402 015372 016546 000130 MoV P.RWCC(RS),-(SP) ZSTORF WORD COUNT 
3403 015376 011665 000012 MOV (SP),P.WCC(RS) 
3404 015402 005416 NEG (SP) s¥AFE IT POSITIVE ( 
3405 015404 116616 000001 MOVB 1(SP),(SP) sFEEP SECTC® COUAT 
3406 015410 105066 000001 CLEB 1(SP) SCLFAR WOST SIGNIFICANT BITS 
3407 015414 021666 000007 cvp (SP), 2055) SCHECF TF PACK CVERRUN C ( 
& 
‘ 














RE611/RFO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30(1046) O1-CEC-77 14:15 PACE 73 


DZR6PR.P11 11-AUG-76 00:00 WRITE WHOLE PACK WITH RANDO™ DATA Sec COSs ( 
3408 015420 103413 BLO 20$ 3RC, CC ISSUE CCHPARD 
3409 015422 001407 BEG 19$ sCHECK TF BO KEW WORD CCUNT WEEDEC ( 
3410 015424 005016 CLR (SP) 3MAKE ROOW FCR NEW WORD COURT 
3411 015426 116666 000002 000001 MOVR 2(SP),1 CSP) g¥CVE I® RUYBER CP SECTCRS LEFT 
3412 015434 005416 wFG (SP) 3MAKE WCRD CCURT BECATIVE ( 
3413 015436 011665 000012 nny (SP),P.WC(RS) jsLOAD NEW WORD COUNT . 
oes 015442 152765 000040 000210 19$: BIse @BITS,P.ASSNCRS) 3SET EWD OF PACK TRANSFER ( 

1 

3416 015450 062706 000006 20$% avo #6,SP sADJUST STACK 
3417 015454 016546 000012 ov P.WC(PS),-(SP) 3 sSTORE PRESEAT WORD COURT 
3418 015460 005416 nec (SP) g¥MAFE IT POSITIVE ( 
341° 015462 062765 000002 00015? aDo €2,P.NODR(RS)  Z;INCRENERT HUMBER OF ORDERS 
3420 015470 061665 000156 aDD (SP),P.RURTCRS) 3;A0D RUPBFR CP WCRDS WRITTER 
3421 015474 005565 000160 adc P. NWRTO2(PS) ( 
3422 015500 062665 000164 avo (SP )¢,P.NROCRS) 3800 NUPBER CF WORDS READ 
3423 015504 005565 000166 adc P.NRO*2(RS) 
3424 015510 10526£ 000122 rece P.RDPTC( RS) SCEWERATE BERT CATA PATTERR TC PE UPIETTED ( 
3425 015514 142765 000360 000122 BICB #360,P.RDPT(CRS) sKEEP 4 LEAST SIGHIFICANT BITS 
3426 015522 116565 000122 000121 wove P.RDPTC(RS ),P.DPAT(RS) sSTORE DATA PATTERN USED 
3427 015530 013737 001450 177776 nov REPOT,PS LOCK OUT REGE THATEPRUPTS ( 
3428 015536 132765 000040 000210 BITe PITS/P-ASSHCES) SCHECK If WEITE TC END OF PACK 
3429 615544 001014 BNE 25$ sYES, RELEASE BUFFER 
3430 615546 005737 001320 st BWATTQ CHECK TF BUFFER WAIT QUEVE EvPTY ( 
3431 015552 001011 AWE 25$ 3NC, RELEASE BUPEER 
3432 015554 016565 000012 000130 nov P.WC(PS),P-PWCC(RS) 3STORE CURRENT GENERATED wORD COUNT 
3433 015562 005037 177776 CLR PS sALLOGW RKOG INTERRUPTS ( 
3434 015566 004737 022532 JSR PC, LDDATA LOAD WEW RABDCY CatTaA 
ey 015572 000137 013530 Jue aSu3$ 3CO ISSUE COMMAND ( 
436 
3437 015576 004737 022316 25$: JSR PC, PUFREL PPELEASE BUFFER FOR OTHER DRIVES 
3438 015602 004037 050706 JSR RO,0.PUSH 3P0T PAPAPETEF PLCCK ON BUFFER WAIT QUEUE 
3439 015606 001320 BWAITQ ( 
3440 015610 004737 022016 JSR PC, GETBUF CET WEW BUFFER 
see 015614 000207 RTS Pc pRETURD ( 
442 
3443 015616 105065 000210 30$: CLRB P.ASSH(P5) SCLEAR ASSIGNMENT CCDE 
3444 015622 004737 022316 JSR PC, PUFREL PPELEASE RUPFER 
3445 015626 104401 055747 wVlSs TYPE ,OPRO08 TYPE “CPERATCR INITIATFD DPOP DaT¥E® ( 
3446 015632 004737 012716 JSK Pc, DROP 3GC CRCP DRIVE 
eae? 015636 000444 BP wv5$ 3CO ALLOCATE PUFFFE ( 
44a 
3449 015640 105065 000210 w¥2S: CLke P.ASSKC(RS) sCLFAR ASSICAWENT FLAGS 
3450 015644 116537 000000 055446 Move P.DRYNC(FS),OPRO11] sCET DRIVE WUPBER 
3451 015652 152737 000060 055446 BISR #60,0P°R011 s¥VAFE IT ASCIT ( 
3452 015660 104401 055427 TYPE 70PP010 TYPE “DRIVE BUPBER & UNDER TEST® 
3453 015664 104401 055172 TYPE ,0PP003 
3454 015670 004737 027060 JSR PC, PRISFR ZPRINT DRIVE AND PACK SERTAL WUPBERS ( 
3455 015674 004737 043072 JSR PC, PRITIM PPRIAT TIVE 
3456 015700 104401 001165 TYPF o$CPRLr 
3457 015704 010346 nov R3,-(SP) sSTORE P3 ON STACK ( 
3458 015706 010446 uov R4,-(SP) 3STORE R4 ON STACK 
3459 015710 010502 “ov R5,°3 LOAD PARAMETER BLOCK BASE 
3460 015712 062703 000152 aDD @?.NODR,k3 sCALCULATF PECIWATHG OF STATISTICS ( 
3461 015716 010504 uov RS,P4 sLCAD PPRAMETER BLOCK BASE 
3462 015720 062704 000210 aDD @P. ASSN, R4 sCALCULATE FAD OF STATISTICS 
3463 015724 005022 1$3 cua (P3)¢ CLEAR STATISTICS BEFORE STARTING TEST ( 


DF 








REG11/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-B 


DZR6PR.P11 


3464 
3465 
3466 
3467 
346" 
3469 
3470 
3471 
3472 


015726 
015730 
015732 
015734 
015736 
015742 
015746 
015750 
015754 


11-AUG-76 00:00 


020304 
001375 
012604 
012603 
004737 
004037 
001314 
004737 
000207 


022316 
050706 


022016 


WRITE WROLE PACK WITH RANDOM DATA 


cep 
BRE 
nov 
nav 
Jsa 
JSR 
AVATILOQ 
JSK 
RTS 


MACY11 30€1046) O1-DEC-77 14315 PACE 74 


R3,P4 

7$ 

(SP )o,R4 
(SP )¢,R? 
PC, BUFREL 
RO,Q.PUSH 


PC, CETBOF 
pc 


sCHEC® TF FIAISHEC 

3¥0, CONTINUE 

SRESTORE R4 

SRESTCRE R3 

SPELEASE BUPFES 

JENQUEVE PAPAPETER PLOCK IN DRIVE 
3 AUAILIABLE QUEUE 

sCET REW BUFEFS 

sPETURG 








¢ 
REGII/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-R MACYI1 30€1046) O1-CEC-77 14:15 PACE 75 
OZR6PS.P11 11-AUG-76 00:00 ALTER ORIVE PARANETERS £8¢ 0097 q 
3473 eSOTTL ALTER DRIVE PARAWETERS ‘ 
3474 
3475 015756 010446 PAR: MOV R4,-(SP) pSTORE R4 OW STACE 
3476 015760 010346 nov R3,-(SP) sSTOKE B39 CR STACE 
3477 015762 116537 000000 056603 P0$: nove P.DPYR(RS),PAROO] JLOAD DRIVE BONPER FOR PRIBT CUT q 
3478 015770 152737 000060 056603 BIsB #60,PAR001 WARE IT ASCII 
3479 015776 104401 056557 TVPE /PAROOO #TYPE °PARAPETERS FCR DRIVE a® 
3480 016002 104401 056610 2S: TYPE 7PAROO2 JTYPE @CYLINDER HAX,HIE® q 
3481 016006 004037 020116 JSa RO, TSTDEF SCHECK POR DEFAULT PARAPETERS 
346? 016012 016124 58 COMMA DETECTED 
3483 016014 016140 6$ SCARGIACE RETURN CETECTED q 
3484 016016 017756 P1$ CONTROL 2 <°7> DETECTED 
3485 016020 015762 POS CONTROL C <°C> DETECTED 
3486 016022 010346 nov R2,-(SP) gSTORF BUFFER ADDRESS q 
3487 016024 004737 053316 JSR Pc, CCTBIB sCONUERT TC BIBAKY 
3468 016030 016106 ae ERROR PETURD 
3489 016032 012637 001576 mov (SP )¢,PARCYL STORE WAR CYLINDER ENTRY q 
3490 016036 022737 000632 001576 cup @D.MXCL,PARCYL CHECK Tf LESS OR EQUAL 10 
3491 3 WAXIWOW CYLINCES ADDRESS 
3492 016044 103420 BLO ae 380, TRY AGAIN < 
3493 016046 010304 mov R3,R4 STORE R3 IW R4 FOR LIE SCAN ‘ 
3494 016050 105714 64$: TsT8 (R4) CHECK POR CARRIACE KETURR 
3495 016052 001435 BEQ 7$ sYES, EXIT ( 
3496 016054 122427 000054 CwPR (R4)0,8°, CHECK FOR COMMA 
3497 016060 001373 BWE 64$ 9"O, CO TEST REXT CHARACTER 
3498 016062 010446 25: nov R4,-( SP) 3STOSE BUPFFE ADDSESS ( 
3499 016064 004737 053316 JSR PC, OCTBIB CONVERT TO BIBARY 
3500 016070 016106 45 ERROR RETURN 
3501 016072 012637 001600 nov (SP)*,PARCYL¢2 jSTORE WIN CYLIRDER ENTRY V 
3502 016076 023737 001576 001600 cwe PARCYL,PAPCYLe2 ;CHECK Te LEGAL ENTRY 
3503 016104 103022 BRIS 88 3YES, LOA: WAX ABD WIN CYLINDER 
3504 016106 45: ( 
3505 016106 010337 016114 HOV R3,65$ pLOAD BUFFER ADDRESS 
3506 016112 104401 TYPE 3TYPE GECELVED TAPUT 
3507 016114 000000 65$: WORD 6 BUFFER ADDRESS ( 
3508 016116 104401 001164 TYPE 2$QUes #TYPE QUESTICH WARK 
3se9 016122 000727 BR 2$ 37RY AGAIN ‘ 
10 
3511 016124 012737 000632 001576 5S: nov #D.MECL,PARCYL j;LOAD MAX CYLIBDER = 410 
3512 016132 010304 mov R3,R4 STORE RI IW R4 FOR LINE SCAN 
3513 016134 105724 TSTR (R4)¢ pADJUST RA ( 
3514 016136 000751 BR 3$ 3CET MINIMUM CYLINDER 
3515 
3516 016140 012737 000632 001576 6$: nov @D.MXCL,PARCYL jLOAD WAX CYLINDER = 410 J 
3517 016146 005037 001600 75: CLR PARCYL¢2 3LCAC MTN CYLIBDES = 0 
3518 016152 013765 001576 000070 4s: nov PARCYL,P.MZCL(RS) 3LOAD MAX CYLIBCER 
3519 016160 013765 001600 000066 mov PARCYL¢?,P.MNCL(RS) ;LOAD MIN CYLISCER J 
20 
3521 016166 104401 056633 10$: TYPE ,ParRO03 sTYPE "TRACE PAX, PIN® 
3522 016172 004037 020116 JSR RO, TSTDEF 3CHECK FOR DEFAULT PARAMETERS 4 
3522 016176 016310 135 COMMA DETECTED 
3524 016200 016324 14$ CARKIAGE RETURN CETECTED 
3525 016202 017770 P2$ CONTROL 2 <*2> CETECTED ( 
3526 016204 015762 POS CONTROL C <*C> DETECTED 
3527 016206 010346 mov R3,-(SP) STORE BUPFFR ADDRESS 
3528 016210 004737 053316 JSK PC, OCTBIN CONVERT TO BIAABY J 





< 
RKG11/RKOG6 PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30(1046) 01-DFC-77 14315 PAGE 76 
OZR6PB.P11 11-AUG-76 00:00 ALTER ORIVE PARAMETERS SEC C098 <q 
3529 016214 016272 12$ ERROR RETURN 
3530 016216 012637 001602 mov (SP )¢,PARTRE #STORE WAX TRACK EBTRY <q 
3531 016222 022737 000002 001202 cup @D."XTR,PARTRK jCHECK IF LESS OR EQUAL TO 
3532 3 MAXIPOW TRACK ADDRESS 
3533 016230 103420 BLO 12$ 390, TRY AGAIN < 
3534 016232 010304 mov R3,R4 STORE R32 IW R4 FOR LINE SCAN 
3535 016234 105714 66$: TSTB (R4) sCHECK FOR CARRIACE RETURN 
3536 016236 001435 BEQ 15$ 3YES, EXIT | 
3537 016240 122427 000054 cwee (R4)¢,8°%, CHECK POR COMMA 
3538 016244 001373 BNE 66$ 3NO, GO TEST REXT CHARACTER 
3539 016746 010446 11$: nov R4,-(SP) STORE BUPFFR ADDRESS | 
3540 016250 004737 053316 JSR PC, OCTBIB sCONVERT TO BIBAKY 
3541 016254 016272 12$ ERROR PETURN 
3542 016256 012637 001604 Mov (SP)*,PARTRE*2 j STORE WIN TRACK FUTRY <q 
3543 016262 023737 001602 001604 CrP PARTRE,PAPTRK*2 jCHECK TF LEGAL ERTRY 
3544 016270 103022 BRIS 16$ ' 3V¥ES, LOAD PAN ARC PIN TRACE 
3545 016272 12$: <q 
3546 016272 010337 016300 mov R3,67$ jLOAC BUFFER ADDRESS 
3547 016276 104401 TYPE #TYPE RECEIVED TKPUT 
3548 016300 000000 67$2 WORD 0 BUFFER ADDRESS d 
3549 016302 104401 001164 TYPE $Qves sTYPE QUESTION PAFK 
3550 016306 000727 BR 10$ gTRY AGAIN P 
3551 
3552 016310 012737 000002 001602 135: mov @D.MXTR,PARTRR 3LCAG WAX TRACK = 2 
3553 016316 010304 “ov R3,P4 STORE R3 IN P4 FOR LIWE SCAN 
3554 016320 105724 TSTB (R4)e ADJUST R4 < 
3555 016322 000751 BP 11$ 3CET MENIMUP TRACE 
3556 
3557 016324 012737 000002 001602 14$: mov QD.MXTR,PARTRE j;LOAD MAX TRACK = 2 q 
3558 016332 005037 001604 15$: CLR PARTRES2 gLOAD MYM TRACK = 0 
3559 016336 113765 001602 000073 165: wove PARTRE,P.METRCRS) LOAD MAX TRACK 
3560 016344 113765 001604 000072 nove PARTRKO?,P.MNTR(RS) 3LOAD MIN TRACK d 
3561 
3562 016352 104401 056653 18$: TYPE /PAROO4 sTYPE @SECTCK PAX, NIN® 
3563 016356 004037 020116 JSR RO, TSTDEF 3CHECK FOP DEFAULT PARAPETERS « 
3564 016362 016474 21$ 3COWMA DETECTED 
3565 016364 016510 22$ CARRIAGE RETURN DETECTED 
3566 016366 020002 P3$ 3CCNIROL 2 <*7> CETECTED « 
3567 016370 015762 POS CONTROL C <°C> CETECTED 
3568 016372 010346 MOV R3,-(SP) STORE BUFFER ADDRESS 
3569 016374 004737 053316 JSR PC, OCTBIB sCORVERT TO BIBARY q 
3*70 016400 016456 20$ ZERPCR RETUPA 
3571 016402 012637 001606 MoV (SP)*,PARSEC STORE WAR SECTOR ENTRY 
3572 016406 022737 000025 001606 cup ĩd. v xSc, ansſste j CHECK IF LESS Ok EQUAL TO q 
3572 3 WAXIWUM SECTOR ADDRESS 
3574 016414 103420 BLO 20$ 3"C, TRY AGAIN 
3575 016416 010304 MoV R3,P4 STORE P3 IN R4 FCR LIWE SCAN d 
3576 016420 105714 68S: TSTP (R4) ZCHEC® FOR CARRIACE RETURN 
3577 016422 001435 BEG 23$ 3YES, EXIT 
3578 016424 122427 000054 CwPB (R4)¢,8°, 3CHECK FOR COMMA q 
3579 016430 001373 BNE 68$ 3NO, CO TEST WEXT CHARACTER 
3580 016432 010446 19$: MoV R4,-(SP) #STORE PUFFFR ADDRESS 
3581 016434 004737 053316 JSR PC, OCTBIN 3CCRVERT TC BINABY | 
3582 016440 016456 20$ ZERROR RETURN 
3583 016442 012637 001610 MOV . (SP)*,PAKSEC¢2 jSTORE MIN SECTOR ENTRY 
3584 016446 023737 001606 001610 cwp PARSEC,PARSEC¢2 3CHECK IF LEGAL ENTRY | 





- 


RF611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
11-AUG-76 00:00 


DZR6P8.P11 


3585 
3586 
35867 
356” 
35869 
3590 
3591 
359? 
3593 
3594 
3595 
3596 
3597 
3598 
3599 
3600 
3601 
3602 
3603 
3604 
3605 
3606 
3607 
3608 
3609 
3610 
3611 
3612 
3613 
3614 
3615 
3616 
3617 
3618 
3619 
3620 
3621 
3622 
3623 
3624 
3625 
3626 
3627 
3628 
3629 
3630 
3631 
3632 
3633 
3634 
3635 
3636 
3637 
3638 
3639 
3640 


016454 
016456 
016456 
016462 
016464 
016466 
016472 


016474 
016502 
016504 
016506 


016510 
016516 
016522 
016530 


016536 
016542 
016546 
016550 
016552 
016554 
016556 
016560 
016564 
016566 
016570 
016574 
016576 
016576 
016602 
016604 
016606 
016612 


016614 
016620 


016622 


016630 
016634 
016640 
016642 
016644 
016646 
016650 
016654 
016656 
016664 


016666 
016666 


103022 


010337 
104401 
000000 
104401 
000727 


012737 
010304 
105724 
000751 


012737 
005037 
113765 
113765 


104401 
004037 
016576 
016622 
020014 
015762 
010346 
004737 
016576 
012504 
022704 
101007 


010337 
104401 
000000 
104401 
000751 


110465 
000403 


112765 


104401 
004037 
016666 
016704 
020022 
015762 
122713 
001013 
112765 
000411 


010337 


016464 


001164 


000025 


001610 


001606 
001610 


056674 
020116 


053316 


000010 


016604 


001164 


000076 


000003 


056717 
020116 


000131 
177777 


016674 


001606 


001606 


000075 
000074 


000076 


000077 


20$: 


2252 
2352 
2452 


2652 


2752 


7052 


28652 


2952 
205: 


23152 


nov 
TYPE 
WCRD 
TYPE 
BR 


nov 
mov 
TstB 
BR 


nov 
CUR 
MOVB 
MOVE 


TYPE 
JSR 
27$ 
29$ 
P4$ 
POS 
MoV 
JSR 
27$ 
MOV 
cwe 
BHI 


mov 
TYPE 
e WORD 
TYPE 
BR 


TYPE 
JSR 
31$ 
32$ 
PSS 
POS 
cupP 
BNE 
MOVB 
BR 
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ALTER DRIVE PARAMETERS 


24$ 
R3,69$ 


0 
@SQUES 
18$ 


@D.¥XSC,PARSEC 
R3,R4 

(R4)¢ 

19$ 


#0.MXSC,PARSEC 
PARSEC*2 


3VES, LOAD WAX ABD PIN SECTCA 


SLOAD BUFFER ADDRESS 
STYPE RECEIVED THPUT 
SPUPFER ADORESS 
STYPE QUESTION PARK 
sTRY AGAIN 


gULGAD WAX SECTCR = 21 

sSTORE P3 IN F4 FOR LIWE SCONn 
sADIUST R4 

3CET MINIMUM SECTCR 


SLOAD MAX SECTOR = 21 
SLOAD MIB SECTGR = 0 


PARSEC,P.MXSCC(RS) Z3LOAD MAX SECTOR 
PARSEC¢2,P.MNSC(RS) JLOAD HIB SECTOR 


@PAROOS 
RO, TSTDEF 


R3,-(SP) 
PC, OCTBIN 


(SP )e,R4 
#10,R4 
28 


R3,70$ 
0 
7SQUES 
26$ 


R4,P.RATECRS) 
30$ 


sTYPE @READ/WRITE RATIO =* 
3CHECK FOR DEFAULT PARAPETERS 
3COMMA DETECTED 

PCARQTAGE RETORW DETECTED 
3COWTRGL 2 <*7> CETECTED 
sCONTROL C <*C> DETECTED 
sSTORE BUPFER ADDRESS 
sCORVERT BINARY 

ZERRCR RETURD 

sSTORE INPUT 

3CHECK IF 0-7 

3YES, LOAO REAC/BPITE RATIC 


SLOAL BUFFER ADDRESS 
aTYPE RECEIVED TAPUT 
ZBUPFER ADDRESS 
STYPE QUESTION MAPK 
sTkY AGAIN 


sLGAC KEAD/WEITE FATIC 
ZASK “WRITE CRECK APTER BRITE =" 


@D.RATE,P.RATECRS) ZLOAD DEFAULT READ/URITE 


7PAR006 
kO, TSTDEF 


#°¥,(R3) 
32 


$ 
é-1,P.AWCK (RS) 
34$ 


R2,71$ 


sTYPE “WRITE CHECK APTEP WRITE =" 
sCHECK FOR DEFAULT PARAWETERS 
sCCPRA DETECTED 

SCAPRIAGE RETORN TETECTED 
sCOWTROL 2 <*Z> DETECTED 
SCONTROL C <*C> DETECTED 
sCHECF TF Y¥FS 

3¥O, LOAD DEFAULT 

SSET WRITE CHECK AFTER WRITE 
dCET COPRECTABLE READ ERROR 

3 THPRESHCLD 


dLOAG BUFFEP ADDRFSS 








11-AUG-76 00:0 


016672 
016674 
016676 
016702 


016704 
016710 


016714 
016720 
016722 
016724 
016726 
016730 
016732 
016736 
016740 


016744 


016746 
016746 
016752 
016754 
016756 
016762 


016764 


016772 


016776 
017002 
017004 
017006 
017010 
017012 
017014 
017020 
017022 


017026 


017030 
017030 
017034 
017036 
017040 
017044 


017046 


104401 
000000 
104401 
000752 


105065 
104401 


004037 
016746 
016764 
020026 
015762 
010346 
004737 
016746 
012665 


100012 


010337 
104401 
000000 
104401 
000752 


012765 


104401 


004037 
017030 
017046 
020034 
015762 
010346 
004737 
017030 
012665 


100012 


010337 
104401 
000000 
104401 
000752 


012765 


001164 


000077 
056751 
020116 


053452 
000100 


016754 


001164 


000012 


057014 
020116 


053452 
000102 


017036 


001164 


000100 
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TER DRIVE PARAMETERS 


71$: 


32$% 
34$% 


35$3 


72$: 


38$: 


2952 


7352 


000005 000102 40$: 


; 
RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 
DZR6PB.P11 0 AL 

3641 
3642 
3643 
3644 
3645 
3646 
3647 
3648 
3649 
3650 
3651 
365? 
3653 
3654 
3655 
3656 
3657 
3658 
3659 
3660 
3661 
3662 
3663 
3664 
3665 
3666 
3667 
3668 
3669 
3670 
3671 
3672 
3673 
3674 
3675 
3676 
3677 
3678 
3679 
3680 
3661 
3682 
3683 
3684 
3685 
3686 
3687 
3668 
3689 
3690 
3691 
369? 
3693 
3694 
3695 
3696 


TYPE 
WORD 
TYPE 
BR 


CURB 
TYPE 


JSR 
35$ 


STYPE GECEIVED TAFUT 


0 sBUFFER ADDRESS 

@SQUES STYPE QUESTION WARK 

30$ aTRY AGAIN 

P.AWCKC(RS) SCLEAR WRITE CHECK AFTER WRITE 

7PAR007 STYPE “CORRECTABLE READ ERROR 
3 THRESHOLD 

RO, TSTOEF SCHECK FOP DEFAULT PARAPETERS 


sCOMMA DETECTED 
SCARRIACE RETORH DETECTED 
3COWIRGL Z <*2> CETECTED 
SCONTROL C <°C> DETECTED 
R3,-(SP) sSTORE BUFFER ADDRESS 
PC, DECBIN SCORVERT TO BIBARY 
3FRRCR RETURD 
(SP)*,P.CERTCRS) 3LOAD COPRECTABLE READ ERROR 
3 THRESHOLD 
30 sTF BOT BECATIVE, GET UBCORRECTABLE 
3 READ ERRCK TARESROLD 


R3,72$ SLOAD BUFFER ADDRESS 
STYPE BECEIVED ThPUT 

G sBUFFER ADDRESS 

7 SQUES STYPE QUESTION PARK 

34$ 3TRY AGALI® 


— — a 210400 DEFAULT CORRECTABLE FEAD 
FRROR THRESHOLD 


aPAROOSB STYPE “UBCOREECTAPLE READ ERRCE 
THRESHOLD =* 
RO, TSTDEF SCHFCK FOR DEFAULT PARAPETERS 


sCOMMA DETECTED 
sCARGIACE GETUER CETECTED 
sCORTROL Z <*Z> DETECTED 
SCONTROL C <*C> DETECTED 

R3,-(SP) sSTORE PUPFER ADDRESS 

Pc, DECBIN sCCHUERT TC BIBAKY 
JERRCR RETURS 

(SP )¢,P.UERTC(RS) 3LOAD UNCORRECTAPLE READ ERROR 
3 THRESHOLD 

42$ 31f BOT BECATIVE, GET SEEK 
3 ERROR THRESHOLD 


R3,73$ sLCAD BUFFER ADDRESS 
STYPE GECEIVED IKFUT 

0 sBUFFER ADDRESS 

7 SQUES STYPE QUESTION PARK 

38$ aTRY AGAIN 


#0.VERT,P.UERTC(RS) sLOAD DEFAULT UNCORRECTABLE REID 
3 ERROR THRESHOLD 


seq 0166 


ZzPr 
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DZR6P8.P11 11-AUG-76 00:00 ALTER ORIVE PARAMETERS Seo 01¢1 q 
3697 017054 104401 057061 42$2 TYPE 7PAROO9 sTYPE “SEEK ERGCKE THRESRCLD =* 
3698 017060 004037 020116 JSR RO, TSTDEF CHECK FOR DEFAULT PARAMETERS | 
3699 017064 017112 43$ COMMA DETECTED 
3700 017066 017130 44$ ICARRTACE RETURN DETECTED 
3701 017070 020042 PBS 3CONTROL 2 <*2> CETECTED q 
3702 017072 015762 POS CONTROL C <*C> DETECTED 
3703 017074 010346 nov R3,-(SP) STORE BOFFER ADDRESS 
3704 017076 004737 053452 JSR PC, DECBIN sCORVERT TO BINARY q 
3705 017102 017112 43$ ZERPCR RETUPR 
3706 017104 012665 000104 nov (30 dooPsRErCRs) LOAD SEEK ERROR THRESHOLD 
3707 017110 100012 BPL 465 CHECK If INHIBIT ERROR CORRECTICE q 
3708 > ABD RETRY 
3709 017112 43$: 
3710 017112 010337 017120 nov R3,74$ LOAC BUFFER ADDRESS J 
3711 017116 104401 TYPE ITYPE RECEIVED IHPUT 
3712 017120 000000 74$: ewoRD 0 BUFFER ADDRESS 
3713 017122 104401 001164 TYPE e$GUES 3TYPE GUESTICR PASE q 
3714 017126 000752 BR 42$ 3TRY AGAIN 
3715 
3716 017130 012765 000005 000104 44s: nov @D.SKET,P.SKET(RS) 3LOAD DEFAULT SEEK ERROR THRESHOLD q 
3717 
3718 017136 104401 057110 46$: TYPE 7PARO10 sTYPE “INHIBIT ERROR CORRECTION 
3719 3 ABD RETRY q 
3720 017142 004037 020116 JSR RO, TSTDEF CHECK FOR DEFAULT PARAMETERS 
3721 017146 017174 47$ 3COMMA DETECTED 
3722 017150 017212 48$ CARRIAGE RETURN DETECTED q 
3723 017152 020050 POS CONTROL Z ¢°Z> OFTECTED 
3724 017154 015762 POS sCOWTROL C <°C> DETECTED 
3725 017156 122713 000131 CMPB a°¥,(R3) 3CHECK If YFS q 
3726 017162 001013 BNE 48$ 3LOAD DEFAULT 
3727 017164 112765 177777 000120 nove $-1,P.IERC(RS) 3SET IMRIPIT ERROR CORRECTION 
3728 017172 000411 BR 50$ IGET COMMAND COURT THRESHOLD J 
3729 
3730 017174 47$% 
3731 017174 010337 017202 nov R3,75$ sLOAC BUFFER ADDRESS q 
3737 017200 104401 TYPE pTYPE RECEIVED TBPUT 
3733 017202 000000 75$: WORD BUFFER ADDRESS 
3734 017204 104401 001164 TYPE 2$Qves ZTYPE QUESTION WARK J 
3735 017210 000752 BR 46$ 3TRY AGAIN 
3736 
3737 017212 105065 000120 48S: CLAP P.IERC(RS) sCLEAR TWRIPIT ERSCR CCRRECTICS q 
3739 017216 104401 057155 : 50$: TYPE PAROLL sTYPE “OPERATION COUNT THRESHOLD*ESK =* 
3740 017222 004037 020116 JSR RO, TSTDEF sCHECK FOR DEPAULT PARAPETERS q 
3741 017226 017272 51$ COMMA DETECTED 
3742 017230 017310 52$ CARRIAGE RETURN CETECTED 
3742 017232 020054 P10$ CORTROL Z ¢<°Z> DETECTED q 
3744 017234 015762 POS sCCNTIRCL C <*C> CETECTEL 
3745 017236 010346 mov R3,-(SP) STORE BUFFER ADDRESS 
3746 017240 004737 053452 JSR PC, DECBIN CONVERT TO BINARY J 
2747 017244 01727? 51$ sFRECP RETURS 
3748 017246 012665 000110 nov (SP)e,P.MRCD¢2(RS) 3STCRE BUMPER CF 65K BLOCKS 
3749 017252 001407 BEQ 518 31" ZERO, TRY ACAIM q 
3750 017254 100406 B¥I 51$ 31TF MINUS, TRY AGAI® 
3751 017256 005365 000110 DEC PoMECD+2( FS) DECKEMENT PY 1 


3752 017262 012765 177777 000106 “ov #-1,P.MXCD(RS) J 
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DZR6PB.P11 


3753 
3754 
3755 
3756 
3757 
3758 
3759 
3760 
3761 
3762 
3763 
3764 
3765 
3766 
3767 
3768 
3769 
3770 
3771 
3772 
3773 
3774 
3775 
3776 
3777 
3778 
3779 
3760 
3781 
3782 
3783 
3784 
3785 
3786 
3787 
3788 
3789 
3790 
3791 
3792 
3793 
3794 
3795 
3796 
3797 
3798 
3799 
3800 
3801 
3802 
3803 
3804 
3805 
3806 
3807 
3808 


017270 


017272 
017272 
017276 
017300 
017302 
017306 


017310 
017316 


017324 
017330 
017334 
017336 
017340 
017342 
017344 
017346 
017352 
017354 
017360 
017362 
017364 
017370 
017374 
017400 
017404 
017410 
017414 
017420 
017424 
017430 


017432 
017432 
017436 
017440 
017442 
017446 


017450 
017456 


017464 
017470 
017472 
017476 
017502 
017504 
017506 
017510 
017512 
017516 
017520 


11-AUG-76 00:00 


000415 


010337 
104401 
000000 
104401 
000743 


012765 
012765 


104401 
004037 
017432 
017450 
020070 
015762 
010346 
004737 
017432 
012665 
001424 
100423 
005065 
006165 
006165 
006165 
006165 
006165 
006165 
006165 
006165 
000415 


010337 
104401 
000000 
104401 
000726 


012765 
012765 


005737 
001430 
104401 
004037 
017530 
017546 
020104 
015762 
122713 
001013 
112765 


017300 
001164 
077777 000110 


177770 000106 


057215 
020116 


053452 
000112 


000114 
000112 
000114 
000112 
“000114 
000112 
000114 
000112 
000114 


017440 
001164 
077777 000114 
177770 000112 


001362 


057513 
020116 


000116 
177777 000116 


51$: 


7652 


5252 


5452 


5552 


7752 


5652 


60$: 


macy1) 30(1046) O1-DEC-77 14315 PAGE 60 
ALTER DRIVE PARAMETERS 


54$ dGET WORD TRANSPERREC THRESHOLD 
R3,76$ sLOAC BUFFER ADDRESS 
sTYPE RECEIVED THPUT 
0 sBUPFER ADORESS 
8008 STYPE QGUESTICH RAPE 
50$ sTRY AGAIN 
G0. CTRH,P.MECDe2( RS) sLCAD DEFAULT COMMAND THRESHCLD 
#0.CTPL,P.MXCDCRS) 
@PARO12 STYPE “WORD TRESFERRED THRESHOLO**S 20K =* 
RO, TSTOEF SCHECK POR DEPAULT PARAPETERS 
sCOPMA DETECTED 
SCAPRIAGCE RETORN DETECTED 
sCOWTROL 2 <*2> CETECTED 
sCOWTROL C <°C> DETECTED 
R3,-(SP) SSTORE BUPFER ADDRESS 
PC, DECBIB SCORVERT TO BIBARY 


sERRCR RETORA 


ee 3STOPE BUNBER CF S20K BLOCES 


dTF ZERO, TRY ACATN 


55 STF BEGATIVE, TRY ACATH 
PoMXUTS2(RS) sCLEAR RMIGH ORDER BITS 
P.MXUTCRS) SSHIET 4 BITS LEFT 
P.MXWT*7(R5) 
P.MRUTC(RS) 
P.MFUTS2(RS) 
P.MEUTCRS) 
P.MXUT*2(RS) 
PoMRUTCRS) 
P.MXUTe2(P5) 
60$ sCHECK FOR SAMPLED COMPARES 
R3,77$ SLOAD BUPFEP ADDRESS 
STYPE RECELVED INPUT 
0 sBUPFER ADDRESS 
@SQUES STYPE QUESTICH PARK 
54$ sTRY AGAIN 
@D.UTHI,P.MXUT¢2(RS) FLOAD DEFAULT WORD TRANSFER 
#0. WTLO,Po.MRWTCRS) 3 THRESHCLE 
SOFCMP SCHPCr TF ARY SOFTWAKE COMPARES ARE TO BE KALE 
PREXAR 3G, DETERMINE TEACK EXCLUSION 
@PAPO21 sTYPE “SAMPLED CCOPPPRES =" 
RO, TSTDEF SCHECK FOR DEFAULT PARAMETERS 
sCOMMA DETECTED 
SCARGTACE RETURN CETECTED 
SCORTROL Z <*2> DETECTED 
sCONTROL C <*C> DETECTED 
#°N,(R3) sCHECK TF BO 
62$ 3¥C, MAKE SAMPLED CCHPARES 
#-1,P.SMPL(PS) 300 NOT MAKE SAMPLED COMPARES 


sto 01C2 








eo — — 
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DZR6PB.P11 


3809 
3810 
3811 
3812 
3613 
3814 
3815 
3816 
3817 
3818 
3819 
3820 
3821 
3822 
3823 
3824 
3825 
3826 
3827 
3828 
3829 
3830 
3831 
3832 
3833 
3834 
38635 
3836 
3837 
3838 
3839 
3840 
3841 
3842 
3843 
38644 
3845 
3846 
3847 
38648 
3849 
38650 
3851 
3852 
3853 
3854 
3855 
3856 
3857 
3858 
3859 
3860 
3861 
3862 
3863 
3864 


017526 


017530 
017530 
017534 
017536 
017540 
017544 


017546 


017552 
017556 
017562 
017566 
017570 
017572 
017574 
017576 
017602 
017604 


017610 
017610 
017614 
017616 
017620 
017624 


017626 
017630 
017632 
017636 
017642 
017644 
017646 
017650 
017654 
017660 
017662 
017664 
017666 
017672 
017674 
017676 
017700 
017704 
017706 
017710 
017712 
017716 
017720 
017722 
017724 
017730 
017732 


11-AUG-76 00300 


000411 


010337 
104401 
000000 
104401 
000747 


105065 


104401 
104401 
004037 
017610 
017750 
017750 
015762 
122713 
001411 
000137 


010337 
104401 
000000 
104401 
000752 


010146 
010501 
062701 
012704 
005021 
005304 
001375 
162701 
004037 
057262 
017746 
017740 
004037 
057270 
017746 
017740 
004037 
057277 
017746 
017740 
_ 004037 
057305 
017746 
017740 
004037 
057314 
017746 


017536 
001164 
000116 
057350 


057322 
020116 


000131 
017750 


017616 


001164 


00023? 
000012 


000024 
020166 


020166 


020166 


020166 


020166 


61$: 


7052 


6252 
PREXAR: 


1S: 


“ov 
TYPE 
WORD 
TYPE 
BR 


CLRB 


TYPE 
TYPE 
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ALTER ORIVE PARAMETERS 


PREXAP 


R3,78S 


0 
@SQUES 
60$ 


P.SMPL(RS) | 


@PARO19 
7PAR018 
RO, TSTDEF 


e°Y¥,(R3) 
2s 
50$ 


R3,64$ 

0 
@SQUEes 
PREXAR 
R1,-( SP) 
R5,P1 


#P.EXAR,R1 
#10.,P4 


#20-2P1 
RO, LDEXAR 


RO, LDEXAR 
RO, LDEXAR 
RO, LDEXAR 


RO, LDEXAR 


SDETERHIBE TRACK EXCLUSION 


SLOAD BUFFER ADDRESS 
dTYPE RECEIVED THPUT 
SUFFER ADDRESS 
STYPE GUESTICH MARE 
sTRY AGAIN 


S¥AFE SAMPLED COMPARES 


STYPE “CHANGE EXCUDED PACK AREA =* 


SCHECE FOR DEFAULT PARAPETERS 
sCOMMA DETECTED 

SCARRIAGCE RETURN DETECTED 
sCONTPOL Z <°Z> CETECTED 
sCONTRGL C <“C> DETECTED 

sCHECK IF YES 

sYES, LOAD NEW TRACK EXCULSIONS 
380, RETURE 


sLOAD BUFFER ADDRESS 
STYPE RECEIVED IMPUT 
2buFFFR ADDPESS 
STYPE QUESTICH PARK 
sTRY AGAIN 


3STOKE Ri OW STACK 

SSTORE PARMETER BLOCK ADDRESS 
sCALCULATE EXCLUSION AREA 
sLcac cCoURT 

sCLEAP EXCLUSION PREA 
sDECRENERT COUNT 

sCHECK TF DOBE 

SREIBITIALI7E PCIRTER 

sCET FIRST EXCLUDED APEA 


SDEFAULT RETURN 
sCCHIROL C <*C> KETORN 
sGET SECOND EXCLUDED AREA 


sDEPAULT PETURE 
sCOMTRCL C <*C> GETURW 
3GET THIRD EXCLUDED ARES 


SDEFAULT RETURA 
SCONTROL C <*C> KBETURN 
sCET FOURTH EXCLUDED AREA 


sDEFAULT RETURE 
SCCRTRCL C <*C> RETURN 
sCET FIFTH EXCLUCED AREA 


SDEPAULT RETUPS 


SE@ 61¢3 


Ly 





ry za ~ ~ » a Aa 
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OZR6PB.P11 


3865 
3866 
3867 
3668 
38669 
3870 
3871 
3872 
3873 
3974 
3875 
3876 
3877 
3878 
3879 
3660 
3861 
3882 
3883 
3864 
3985 
3886 
3887 
366 
3889 
3890 
3891 
389? 
3893 
3894 
3895 
3896 


017734 
017736 


017740 
017742 


017746 
017750 
017752 
017754 


017756 
017764 
017770 
017776 
020002 
020010 
020014 
020022 
020026 
020034 
020042 
020050 
020054 
020062 
020070 
020076 
020104 


020110 
020112 
020114 


11-AUG-76 00:00 


017740 
000403 


012601 
000137 


012601 
012603 
012604 
000207 


012765 
005065 
112765 
105065 
112765 
105065 
112765 
105065 
012765 
012765 
012765 
105065 
012765 
012765 
012765 
012765 
105065 


012603 
012604 
000207 


015762 


000632 
000066 
000002 
000072 
000025 
000074 
000003 
000077 
000012 
000005 
000005 
000120 
077777 
177770 
077777 
177770 
000116 


000070 
000073 
000075 
000076 
000100 
000102 
000104 
000110 
000106 


000114 
000112 


— — — —— — — — — — — 
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ALTER DRIVE PARAMETERS Seo 0104 
405 sCORTROL C <*C> KETORN 
BP 455 2 7BuRu 
Mov (SP)+,R1 SPESTORE R1 
JMP POS sSTART AGAI® 
nov (SP )o,R1 SRESTORE R1 
nov (SP)*,R3 . SRESTORE R3 
nov (SP)e,R4 SRESTORE P4 
RTs Pc sRETURG 
nov GD. MXCL,P.MECL(RS) ZLOAD DEFAULT PARINUP CYLIBDES = 410 
CUR PoMRCL(RS) SLOAD OEFAULT MINIMUM CYLINDER 
nove GO. MXTR,P.METRCRS) PLOAD DEFAULT PARINUP TRACK = 7 
CLRB P.MBTRC(RS) SLOAD DEFAULT HIBTHON TRACK 
move @D.MXSCoP.MXSCC(RS) ZLOAD DEFAULT PARIMUP SECTOR = 21 
CLRB P.MBSCC( RS) SLOAL DEFAULT MIHIMNOM SECTOR 
wove #O.RATE,P-RATECRS) LOAD READ/URITE RATIO 
CLRB Po AWCK(RS) SLOAD WRITE CRECK AFTER BRITE 
nov #D.CERT,P.CERT(RS) 3LOAD CORRECTABLE READ ERROR TRRESFOLD 
MoV @D.UERT,P.UERT(RS) LOAD UNCORRECTABLE READ ERRCKR THRESACLO 
nov #0. SKET,P.SKET(@S) sLOAD SEEK ERECK THRESHCLO 
CURB P.TERC(RS) SCLEAR IMMIBIT ERROR CORRECTION 
nov @0.CTRH,P.MXCD¢2(RS) SLOAD COMMABD THRESHOLD 
nov #0. CTRL, P.MXCDC(RS) 
nov GO.UTAI,P.MXUT¢2(R5S) ZLOAD WORD TRANSFERRED THRESHCLD 
nov #0.WTLO,P.MXUTC(RS) 
CLRB P.SMPL(RS) 3MAKE SAMPLED COMPARES 
nov (SP)¢,R3 SRESTORE F3 
MoV (SP )#,R4 SRESTORE R4 
RTS: pc sPETUPH 
» 


Me 
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3997 
3998 
3899 
3900 
3901 
390? 
3903 
3904 
3905 
3906 
3907 
3908 
3909 
3910 
3911 
391? 
3913 
3914 
39186 
3916 
39147 
3918 
3919 
3920 
3921 
3922 
3923 
3924 
3925 
3926 
3927 
3928 
3929 
3930 
3931 


020116 
020120 
07012? 
020126 
020130 
02013? 
020134 
020136 
020140 
020144 
020146 
020150 
0270154 
020156 
020160 


070162 
020104 


11-AUG-76 00:00 


104403 
012603 
121327 
001415 
005720 
109712 
001412 
005720 
122713 
001406 
005720 
122713 
001402 
005720 
000200 


011000 
000200 


000054 


000032 


000003 


TEST DEFAULT PAPAPETERS KCUTIFE 


WACYI11 70(1046) O1-LEC-77 14215 PACE 63 


eSBTTL TEST DEFAULT PARAPETERS ROUTINE 


pp eeeaaeaaeeverenanessanesasasagnsaenagerananasansaneneasanaenenes 


3? 

3° THIS ROUTIWE WILL READ A LIWE OF ASCIT TEXT AND CHECK 
3° IF PARAMETER OR REST OF PAPAPETERS WILL BF CEFAULTEC. 
3* If RETUPNS WITH K3 POINTING TO THE AODRESS CF THE BUFFEr. 
e 

P*CALL JSR RO, TSTOEF 

3° <AODRFSS OF COMA DFTECTION RETURN 

3° CADDRESS OF CARPIAGE RETURN CETFCTICN RFTUKRD 

3* CADDRESS OF CONTRCL Z <*Z> DETECTION RETURN 

3° CADDRESS OF CONTKCL C <*C> PETECTICR PETUFND 

3° RETURN 


pp eee eaengacervansensasngansananasanasagagavansaasaaaaneneannaaeees 


TSTNEF: RDLIN 
MOV 
C¥PR 
BF@ 
151 
TSTR 
BFG 
TST 
cype 
BEG 
157 
cvpe 
BEQ 
TST 
RTS 


10$: MOV 
RTS 


(SP )e,R3 
(R3),8°, 


10$ 
(PO)+ 
(P3) 
10$ 
(PO)*@ 


#32, (R3) 


(RO),R0 
RO 


3CET PESPONSE 

SSTOKE PRUFFFR ADDRESS 
sCHECR TR COMPA 

sVYES, KFTUERK 

ZADJUST RO 

SCHECR TF CARPIAGE RETUGA 
3VES, KFTUEN 

ZADJUST RO 

SCHECK IF CONTKOL Z <“Z> 
3YES, RFIURR 

ZADIJUST RO 

SCHECK IF CONTROL C <“C> 
sYES, RETURN 

zAOJUST FO 

SPETUPN 


sSTOKE PETUPA ADDRESS 
sRETUPR 


Sec cics 


#9 








RE611/RK06 PERFORMANCE EXERCISER MATNDEC DZR6P-8 


DZR6PP.P11 


3932 
3932 
3934 
3935 
3936 
3937 
3938 
3939 
3940 
3941 
3942 
3943 
3944 
3945 
3946 
3947 
3948 
3949 
3950 
3951 
3952 
3953 
3954 
39558 
3956 
3957 
32958 
3959 
3960 
3961 
3962 
3963 
3964 
3965 
3966 
3967 
3968 
3969 
3970 
3971 
3972 
3973 
3974 
3975 
3976 
3977 
3978 
3979 
3980 
3961 
39862 
3983 
3984 
3985 
3986 
3987 


020166 


020172 
020174 
020176 
020202 
070206 
020210 
020212 
020214 
020216 
020220 
020224 
020226 
020232 
020234 
020240 
020242 
020246 


$20250 
020252 


11-AUG-76 00:00 


012037 


104401 
000000 
104401 
004037 
020617 
020634 
020634 
020632 
010346 
004737 
020612 
022716 
103566 
011637 
006316 
062637 
010304 


105714 
001525 


020174 


057322 
020116 


053316 
000632 
001612 
001612 


MACY11 30€1046) O1-DEC-77 14315 PACE 64 


LOAD DISK EXCLUDED AREAS 


- SBTTL 


LOAD DISK EXCLUDED AREAS 


JP TAAAAA 


THIS ROUTINE WILL ACCEPT TTY IMPUT FOR EXCLUDED AREAS AWL 

LOAD APPROPIATE IDENTIFICATICR RUPBFES Th THE EXCLUDED AbEAS CPF 
THE PARAMETER BLOCK. THE FOLLOWING THREE FORMATS APE 

ACCEPTED BY THIS ROUTINE: 


cYL 

CYL, TRE 

CYL1,TRE1I,CYL2, TRE 2 
TRE FOLLOWING FORMULA IS USED: 


CYL1*66¢TRK1*22¢) = BEGINING GF EXCLUDED AFEA 
CYL2*66¢TFK2°22¢1 = END OF EXCLUCED AREA 


REGISTER USE 

R1 ADDRESS IW EXCLUDED AREA 
k3 ADDRESS OF TAPUT STPIRG 
ka ADDRESS If TAPUT STFING 
aS PARAMETER BLOCK ADDRESS 
JSR RO, LDEXAR 


<ADDRFSS OF MESSAGE TO PRINTD 

<ADDDRESS FOR CARRIAGE RETURN OR CONTROL 7 <*7> DETECTIONS 
<ADDRESS FOR CONTROL C <“C> DFTECTICN> 

RETURN 


ppeteeavengeeneneanaasensanaeaeanananaeananaananasanenaaaaesanaene 


LDEFAR: MOV (RO)e2$ SUCAC WUMPBEF CP EXCULSICH AFEA 
1$: TYPE sTYPE “WTR EXCLUDFD AREA =" 
2$3 e WORD 0 

TYPE @PARO18 

JSR RO, TSTOEF sCHECE FOR DEFAULT PARAPETERS 

30$ , 3COMPMA DETECTED 

45$ SCARGIAGE KFIUEN CETECTED 

45$ sCOMTROI Z <*7> CETECTED 

40$ sCONTROL C <*C> DETECTED 

MoV R3,-(SP) SSTORE RUFFER ADOFESS 

JSR PC, CCTBIA SCCRVERT TC BINAEY 

30$ sERRCPR RETUPD 

CMP #410.,(SP) sCHFCR TF LEGAL CYLINDER 

BLO 29$ 3PO, TRY AGAIR 

MOV (SP), FRAREA SMULTTPLY CVYLIBOE® ADDRESS PY 3 

ASL (sP) 

ADD (SP )@,EXAREA 

MOV R3,P4 SSTORE PECINAING CF COMMAND STRIAC 
64S: TSTB cP4) sCHECF FOR CAPRIACE RETURN 


BEQ 10$ sYES, EXIT 


S&C 016 





RK611/RKO6 PERFORMANCE EXERCISER PAINDEC DZR6P-F 


DZR6PB.P11 


3968 
3989 
3990 
3991 
3992 
3993 
3994 
3995 
3996 
3997 
3998 
3999 
4000 
4001 
4002 
4003 
4004 
4005 
4006 
4007 
4008 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4016 
4017 
4018 
4019 
4020 
4021 
4022 
4023 
4024 
4025 
4026 
4027 
4028 
4029 
4030 
4031 
4032 
4033 
4034 
4035 
4036 
4037 
4038 
4039 
4040 
4041 
4042 
4043 


020254 
020260 
020262 
020264 
020266 
020272 
020274 
020276 
020302 
020304 
020310 
020312 
020316 
020322 
020326 
020330 
020334 


020336 
020340 
020342 
020346 
020350 
020352 
020354 
020360 
020362 
020364 
020370 
020372 
020376 
020400 
020404 
020406 


020412 
020414 
020416 
020422 
020424 
020426 
020430 
020434 
020436 
020440 
020444 
020446 
020452 
020454 
020460 
020464 
020470 
020472 
020476 
020500 
020506 


11-AUG-76 00:00 


122427 
001373 
105714 
001552 
121427 
001547 
010446 
004737 
02061? 
022716 
103537 
063716 
012746 
004737 
005216 
012637 
005726 


105714 
001511 
122427 
001373 
105714 
001517 
121427 
001514 
010446 
004737 
02061? 
022716 
103504 
011637 
006316 
062637 


105714 
001476 
122427 
001373 
105714 
001471 
121427 
001466 
010446 
004737 
020612 
022716 
103456 
063716 
012746 
004737 
005216 
012637 
005726 
023737 
103041 


000054 


053316 
000002 
001612 
0000 26 
054064 


001612 


000054 


000054 


053316 
000632 
001614 
001614 


000054 


000054 


053316 
000002 
001614 
000026 
054064 
001614 


001612 001614 


MACY11 30€1046) O1-CFEC-77 14315 PACE 65 


LOAD DISK EXCLUDED AREAS 


65$: 


CreR 
BWE 
TsTB 
BEQ 
CrPB 
BEG 
uor 


(R4)¢,8°, 
64§ 

(R4) 

30$ 

(R40 99°, 
30$ 
R4,-(SP) 
PC, OCTBIN 


#2,(SP) 

29$ 

EXAREA, (SP) 
#22.,-(SP) 
PC, SMULT 
(SP) 


(SP )e, EXAREA 
(SP )¢ 


(P4) 


20$ 
(R4)¢,8°, 
65 


#410.5(¢SP) 
29 


$ 
(SP), FXARFEAe2 


(SP) 


(SP )¢,EXAREA2 


(R4) 
30$ 
(RA)⸗ 


R4,-(SP) 
PC, OCTBIN 


#2, (SP) 
29$ 


EXAREA*?, (SP) 


#220¢-(SP) 
PC, SMULT 
(SP) 


(SP), EXAREAS2 


(SP)¢ 


EXAREA, EXARFEA*2 


sCHECK FOR COPRA 

380, CO TEST REXT CRAPACTESR 
sCHECK TF CARRIAGE RETUPA 
sYES, TRY ACAI 
SCHECK IF COMPA 

sYES, TRY ACAI 
sSTORE BUFFER ADDRESS 
SCORVERT TO BIBARY 
sFRROR RETURD 

SCHECK TF LEGAL TRACK 


3TRY AGAIN 


sPUT MULTIPLIER Of STACK 
sPUT MULTIPLIER GB STACK 
300 MOLTIPLICATICH 


3400 1 
sSTORE VALUE 


STHROW AWAY MOST SICHIFICANT BITS 
sCHECK POR CARRIACE RETURN 


sYES, EXIT 


sCHECK POR COPHA 

3G, GO TEST BERT CHARACTER 
sCHECE IF CARRIAGE RETURS 
sVES, TRY ACAI 

SCHECK TF COMPA 

sYES, TRY ACATD 

sSTORE BUFFER ADCRESS 
SCORVERT TO BIBARY 

JERRCR RETURE 

SCHECR TF LEGAL CYLINDER 
3"O, TRY AGAIN 

SMULTIPLY CYLIMDER ADDRESS BY 3 


SCHECK FOR CARRIACE RETURN 


sYES, EXIT 


sCHECK POR CCPHA 

3NO, GO TEST REXT CHARACTER 
sCHECK IF CARRIAGE RETURD 
dVES, TRY AGAT 

sCHECK TF COPPA 

sYES, TRY ACAIN 

sSTORE BUFFER ADDRESS 
sCORVERT TO BIBARY 

ZFARCR RETORS 

sCHECR IF LEGAL TRACK 


sTRY AGAIN 


sPUT MULTIPLIER CH STACK 
sPUT MULTIPLIER CK STACK 
3D0 MOULTIPLICATICH 


sADD 1 


sSTORE VALUE 

STHROW AWAY MCST SIGNIFICANT BITS 
SCHECK ITF LYGAL RANGE 

200, TRY AGAIN 


. 





s&é¢@ 0107 


co? 





4044 
4045 
4046 
4047 
4048 
4049 
4050 
4051 
4052 
4053 
4054 
4055 
4056 
4057 
4058 
4059 
4060 
4061 
4062 
4063 
4064 
4065 
4066 
4067 
4068 
4069 
4070 
4071 
4072 
4073 
4074 
4075 


DZR6P8.P11 


020510 
020514 
020520 
020524 


020526 
020532 
020536 
020542 
020544 
020546 
020552 
020554 
020556 
020562 


020564 
020570 
020576 
020602 
020606 


020610 
020612 
020616 
020620 
02062? 
020626 


020632 
020634 
020636 


11-AUG-76 00:00 


013721 
013721 
062700 
000 200 


013746 
012746 
004737 
005216 
011621 
062716 
012621 
005726 
062700 
000700 


013721 
062737 
013721 
062700 
000200 


005726 
010337 
104401 
000000 
104401 
000137 


005720 
011000 
000200 


001612 
001614 
000004 


001612 
000026 
054064 


000102 


001612 
000026 
001612 
000004 


020620 


001164 
020172 


001612 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B8 


MACY11 30(1046) O1-DEC-77 14315 PACE 86 


LOAD DISK EXCLUDED AREAS 


10$: 


20$3 


29$% 
30$: 


31$: 


40$: 
45$: 


nov 
nov 
aoD 
RTS 


EXAREA,(F1)¢ 


EXAREA2,(R1)¢ 


#4,R0 
RO 


EXAPEA,-(SP) 
#22-¢-(SP) 
PC, SMULT 
(SP) 

(SP), (R14 
#66.,(SP) 
(SP )o,(R1)* 
(SP)¢ 

#4,R0 

RO 


EXAPEA,(R1)¢@ 
€22-,EXAREA 
EXAREA, (R1)* 
#4,F0 

RO 


CSP )¢ 
R3,315$ 


0 
7 SQUES 
is 


CRO De 
(RG),RO 
RO 


sLCAD EFCLUDED AREA 


sADJIUST RO 
sRETUPR 


sLOAC MULTIPLIER 
sLOAD MULTICARD 
sCALCULATE VALUE 
STUCKEMERT RESULTS 
SSTORE EXCLUDED AREA 


STHPCW AWAY BUST SICHTFICANT BITS 


ZaDJIUST RO 
sPETORS 


SSTORE EXCLODEED PREA 


za0JUST KO 
sPETURS 


JADJIUST STACK 


sLCAC BUFFER ADDKESS 
STYPE RECEIVED IBFUT 
SBUPFER ADDRESS 
STYPE QUESTICR PARK 


3TEY AGAIN 
sADJUST RO 


SSTORF SPECTAL RETUFN ADDRESS 


sPETURS 









€ 
SEG C1CE < 
< 
€ 
c 
€ 
€ 
€ 
€ 
€ 
€ 
€ 
€ 
€ 
J 
€ 
€ 
q 
€ 
€ 
D9 C 
€ 





RK611/RKO6 PERFORMAWCE EXERCISEP MAINDEC DZR6P-8 MACY11 30(1046) O1-CEC-77 14:15 PACE 67 
DZR6PB.P11 11-AUG-76 00:00 GENERATE WHEW RANDOM COMMAND 
pod eSBTTL CENERATE WEW RANDOM COMPARD 
7 
—*— 3 7 III 
4079 g* 
4080 3* If SWITCH 14 IS RESET, THIS ROUTINE BILL STORE THE PREVICUS 
4081 — COMMAND AND GENERATE A KEW RAWDOM COMMAND. A CHECK IS PATE 
40862 3* OW THE DISK ADDRESS AND TRE DISK ADDRESS « THE HUMBER OF 
408? 3* SECTORS TO BE READ OR WRITTER. IPF THE DATA TRARSFER WILL 
4084 3* CAUSE DATA TO BE READ CR WRITTER PEYCHC THE HAXIWON PACE 
4085 3* ADDPESS OR USES AWRY PART OF AW EXCLUDED AREA, A BEW DISK 
4086 * ADDRESS WILL BE RANDOPLY CEWERATED. 
4087 3* 
4068 3* REGISTER USE 
4089 3 ® Ses ecaae ——— 
4090 3* 
4091 3* Ri EXCLUSION AREA COUNT 
4092 3* R3 EXCLUSION AREA INDEX 
4093 g* R4 SECTOR POSITION 
4094 3* RS PARAMETER BLCCK ADDRESS 
4095 3* (SP) SECTORS T0 BE TRANSFERRED 
4096 3* 
4097 3* 
4098 g* If SWITCH 14 IS SFT, THIS ROUTINE WILL SEPK TO THE PREVICUS 
4099 3* DISK POSITION OP REISSUF THE LAST COMPARD DEPENDENT OF THE 
4100 3* P.SEEK FLAG If THE PARAPETER BLOCK. 
4101 3* 
4102 ge 
4103 3* ROUTINES USED 
4104 3* eooorsocor---- 
4105 2* 
4106 3* Q.PUSH 
4107 3* SPAND 
4108 3* $MULT 
4109 ed 
4110 3*CALL JSR PC, GENEPT 
4111 ° 3* RETORW 
4112 e 
4113 33 ARRAKAAAAAARARAAHRARAASAHARAARARARARAAAAARRAAAAAAAARARARARAeAARAeA 
4114 
4115 020640 005065 000146 GEWERT: CLR P.RECTCRS) SCLEAR FRROR FLAGS AND 
4116 020644 005005 000150 CLR P.DSTTC(RS) 3 RETRY COUNTS 
4117 020650 005065 000212 CLR P.EPR(RS) 
4118 
4119 020654 032777 040000 160256 BIT #S¥14,@SuR sCHECK IF NEW CORPARD 
4120 3 SHOULD BE GCERERATED 
4121 020662 001454 BEG 10$ ZYES, GENERATE WEW COMMARD 
4122 020664 105765 000211 TSTB P.SEEF( RS) sCHECK TF PREVIOUS CYLINDER ISSUEC 
4123 020670 001020 BNE 1$ 2ES, SET UP DATA TRANSFER 
4124 020672 112765 177777 000211 MOVR #-1,P.SFEEK(RS) s3TWDICATE SEER FAS BEEN ISSUED 
4125 020700 112765 000117 000001 wove @SEEK,P.CPND(RS)  ;LCAD SEEK PARAMETERS 
4126 020706 016565 000136 000002 MOV P.LCYL(RS),P-CYLN(R5S) ZLOAD PRICR CYLINDER 
4127 020714 016565 000140 000004 MoV P.LSEC(RS),P.SECT(RS) 3LOAD PRICR SECTOR AND TRACK 
4126 020722 004037 050706 JSR RO,G.PUSH sPUT PARAMETER PLCCK Cw 
4129 020726 001324 Crarra 3 COMMAND THITIATION QUEUE 
aa 020730 000207 RTS PC SRETURN 


Sé@ 0109 


fT 











RK611/RKO6 PERFORMANCE EXERCISER MATHDEC DZR6P-B 


DZR6PB.P11 


4132 
4133 
4134 
4135 
4136 
4137 
4138 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4148 
4149 
4150 
4151 
4152 
4153 
4154 
4155 
4156 
4157 
4158 
4159 
4160 
4161 
4162 
4163 
4164 
4165 
4166 
4167 
4168 
4169 
4170 
4171 
4172 
4173 
4174 
4175 
4176 
4177 
4178 
4179 
4160 
4181 
4182 
4183 
4184 
4185 
4186 
4187 


020732 
020736 
020744 
020752 
020760 
020766 
020770 
020776 
021004 
021012 


021014 
021020 
021022 
021024 
021026 
021030 
021036 
021044 
021052 
021060 
021066 
021072 
021076 
021102 
021104 
021110 
021112 
021116 
021120 
021124 
021130 
02113? 
021134 
021136 
021140 
021142 
021146 
021154 
021160 
021164 
021170 
021174 
021176 
021202 
021206 
021212 
021216 
021222 
021224 
021230 
021234 
021236 
021244 
021250 
021254 


11-AUG-76 


105065 
116565 
116565 
016565 
122765 
001003 
052765 
0165065 
016565 
000207 


005077 
010446 
010346 
010146 
010046 
116565 
016565 
016565 
016565 
116565 
004737 
013746 
013746 
005216 
004737 
005726 
042716 
001002 
012716 
116604 
105716 
001401 
005204 
011646 
005416 
012665 
062765 
005565 
113746 
042716 
126526 
101462 
113746 
042716 
111665 
112665 
105765 
001017 
113746 
042726 
001412 
112765 
062665 
005565 
005565 


000211 
000122 
000123 
000124 
000131 


000200 
0001 26 
000130 


160124 


000123 
000124 
0001 26 
000130 
000122 
054200 
054300 
001354 


054064 
100003 


000004 
000001 


000017 
000001 
000154 
054276 
177770 
000076 


054277 
177760 
000122 
000121 
000077 


054276 
177707 


000123 
000156 
000160 
000162 


000121 
000001 
000002 
000001 


000014 
000004 
000012 


000135 
000136 
000140 
000142 
000144 


000152 


000123 


macvil —_— O1-CEC-77 14315 PAGE 68 


GENERATE WEW RANDOM COMNMAR 


1S: 


2$3 


1152 


1252 


CLRP 
nove 
Movs 


P.SEEK(RS) STMDICATE DATA TEANSFER ISSUED 
PoRDPT(RS),P.DPATC(RS) ZLOAD LAST DATA PATTERR 
P.RCHD(RS),P.CHRDC(RS) 3LOAD LAST COMMARD 
P.RCYL(RS),P.CYLECRS) jZLOAD LAST CYLIBDER ADDRESS 
@URTCHK,P.CPNDCRS) sZCHFCK ITF GRITE CHECK 

2s 380, DO BOT SET FLAC 
@U.WCK,P.PRST(RS) 3SET ISSUE WRITE FOR WRITE CHECK 
PoRSEC(RS),P.SECTC(CRS) LOAD LAST SECTOR ABD TRACE 
P.RUC(RS),P.UC(CRS) 2L.0400 LAST UCRO COURT 


Pc sPETURS 

@STKS sLOCK OUT TTY INTERRUPTS 
R4,-(SP) sSTOKE P4 OW STACK 
R3,-(SP) sSTOKRE P3 OW STACK 
R1,-(SP) sSTORE R1 OW STACK 

RO,-( SP) sSTOKE RO ON STACK 


PoRCHD(PS),P-LCHD(RS)  ZSTORE LAST COMMAND 
P.RCYL(RS),P.LCYL(85) 3STORE LAST CYLISDER 
P.RSEC(RS),P.LSEC(RS) 3STOPE LAST SECTOR ABD TRACK 
PeRUC(RS),P.LUC(RS) ZSTCRE LAST WORD COUNT 
P.RDPT(RS),P.LDOPT(RS) sSTORE LAST PATTERS 

PC, SRAND SCERERATE RABDOW BUPBER 

$LONUM,-( SP) sLOAC WOULTIPLIER 

MAXBUF,-(SP) SLOAD MULTIPLICARC 


(SP) STUCREMERT WORD COUNT MAX. 

PC, SMULT sCALCULATE WORD COURT 

(SP) sTHRCW AWAY LEAST SIGRIFICANT BITS 
#100003,(SP) SARE DIVISIBLE BY 4 AND < 32K 
11$ 3TF BOT ZERO USE WORD COURT 
#4,( SP) SPAKE WORD CCUNT 4 

1(SP),R4 SCALCULATE NUPBER OF SECTORS TO 
(sP) > TRABSFERRED 

12$ 3TF EVER SECTCRS OO NOT MODIFY 
R4 3 SECTCR CCURT 

(SP),-(SP) SSAVE BORD COURT 

(SP) SCEWERATE NEGATIVE BUNBER 


(SP)¢,P.WC(RS) jZLOAD PRESENT WCRD COUNT 
#1,P.RODR( RS) STOCEEMPAT BOPBES CP C&CERS 
P.NODRe2( PS) 

SHINUM,-(SP) sRANDOM HUMPER FOR COMMAND 
#177770, (SP) sFEEF LOW 3 BITS 
P.RATECPS),(SP)* ZDETEPMINE Tf GEAD CR WRITE 
15$ sISSUE PEAD 

SHINUMO1,-(SP)  ZPRANCOM NUMBER POR PATTERR 
#177760, (SP) sFEEP LOW 4 BITS 
(SP),P.POPTCRS) sSTOBE DATA PATTER 


(SP )¢,P.DPATC(RS) 
P.AWCK (RS) sCHECE Tf AUTC WRITE CHECK 
13$ sYES, ISSUE BRITE CHECK 


SHINUM,-( SP) SRAWCOM BUMPER PCE WRITE CHECK 
#177707,(SP)¢ sCHECK TF WRITE CCMPARD 

13$ sYES, ISSUE BRITE CHECK 
#WURDATA,P.RCMD(RS) jISSUE WRITE CATA 
(SP)*,P.KWRTCRS) ZADC WUMBE® CF BORDCS TC BE WRITIES 
P.NWRTO2(R5S) 

P.MWRTO4(RS) 


FF 








RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
_) OZR6PB.P11 11-AUG-76 00:00 


4186 021260 000441 
: 4189 
4190 021262 112765 000131 000123 13$: 
4191 021270 052765 000200 000014 
4192 021276 062765 000001 000152 
4193 021304 005565 000154 . 
4194 021310 061665 000156 
4195 021314 005565 000160 
4196 021320 005565 000162 
4197 021324 062665 000164 
4198 021330 005565 000166 
4199 021334 005565 000170 
4200 021340 000411 
4201 
420? 021342 112765 000121 000123 15S: 
4203 021350 062665 000164 
4204 021354 005565 000166 
4205 021360 005565 000170 
4206 021364 116565 000123 000001 18$§: 
4207 021372 012700 000100 
4208 
4209 021376 010503 20$% 
4210 021400 062703 000232 
4211 021404 012701 000005 
4212 021410 004737 054200 
4213 021414 016546 000070 
4214 021420 166516 000066 
4215 021424 001406 
4216 021426 005216 
4217 021430 013746 054300 
4218 021434 004737 054064 
4219 021440 005726 
4220 
4221 021442 066516 000066 21$3 
4222 021446 011665 000124 
4223 021452 116537 000073 001566 
4224 021460 116537 000072 001570 
4225 071466 163737 001570 001566 
4226 021474 001415 
4227 021476 005046 
4228 021500 113716 054277 
4229 021504 013746 001566 
4230 021510 005216 
4231 021512 004737 054064 
4232 021516 116637 000001 001566 
hb 021524 062706 000004 
4 
4235 021530 063737 001570 001566 22S: 
4236 021536 113765 001566 000127 
4237 071544 116537 000075 001572 
4238 021552 116537 000074 001574 
4239 021560 163737 001574 001572 
4240 021566 001415 
4241 071570 005046 
4242 021572 113716 054276 
4243 021576 013746 001572 


MOVR 
BIS 
ado 
aoc 
ADD 
aoc 
aoc 
aoDd 
aoc 
aoc 
Be 


uor 
avo 
aoc 
aoc 
nove 
nov 


MOV 
adD 
nov 
JSR 
nov 
SUB 
BEQ 
Iwc 
“OV 
JSR 
Tst 


aDD 
MOV 
MOVB 
nOVR 
SUB 
BEG 
CLR 
MOVR 
uov 
Inc 
JSR 
MOVB 
ADD 


ADD 
move 
nove 
nCVB 
SUB 
BEQ 
CLR 
MCVA 
MoV 


MACY11 30(1046) O1-DEC-77 14:15 PAGE 89 


GENERATE WEW RANDOM COMMAND 


18$ 


SURTCHK,P.RCMDC(RS) ZISSUE WRITE CHECK 
QW.WCK,P.PRST(RS) Z3SET NO WRITE FOR WRITE CHECK 
#1,P.HODRC RS) STOCHPAPRT HUPBER OF COMMAND ISSUEC 
P.HODR*2(R5) 

(SP),P.HUPTC(RS) ;A0D RUMBER CP WCROS TO BSE WRITTES 
P.WWRTO2( RS) 

P.WURTO4( PS) 

(SP )o,P.HRDCRS) 3ADD HUPBER CF WORDS READ 
P.WRDO2(RS) 

P.WRDO4( RE) 

18$ 


GRDDATAZP.RCHD(RS) jZISSUE PEAD DATA 
(SP)¢,P BROCE) 3A0D RUPBER CP WCRDS READ 
P.WRDO2(RS) 


P.NRD*4(RS ) 

P.RCHD(RS),P.CHBD(RS) 3LOAD COPRAND 

#100,80 sLGAC BEGEMERATE CCUBT 

RS,R3 sLOAD IWOEX 

#P.EXAR,R? SCALCULATE EXCLOUCFO APEA IBDE? 
#5,P1 sLCAC BAC TRACK CCURT 

PC, S$RAND SCERERATE RANCOP RUPBER 


P.MXCLC(RS),-(SP) STORE BAXIPUW CYLINDER 
PoMNCLCRS),(SP) sCALCULATF CIFFERFACE 


21$ 31F G, SKIP BULTIFLY 

(SP) STUCREMFNT DIFFERENCE 

$LORUY,-(SP) sPUT PULTICARD OB STACK 

PC, $HULT sCALCULATE CYLINCER ADDRESS 

(SP)¢ STHPOW AWAY LEASE SIGNIFICANT BITS 


P.MRCL(RS),(SP) CALCULATE CYLIRCER 
(SP),P.RCYLCRS) ZSTORF CYLINCER 
P.METRCRS),THPTPKR ZSTORE MAXIMUM TPACK 
P.MNTRCRS),THPTRK¢2 3STORE MINTMOM TRACK 
THPTREO?, TMPTRK ;CALCULATE PERFERENCE 

22$ sT&=0, SKIP PULTIFLY 

-(SP) s¥AKE ROOY OW STACK 
SRIRUPO1, (SP) 3PUT TN MULTIPLIER OW STACK 
TMPTRK,-(SP) 3PUT TRACK WUPBFR OW STACK 
(SP) STACKPRPNT CIPREBEACE 


PC, SMULT SCALCULATE ThACEK 
1(SP),TWPTRE sSTORE TRACK 
#4,SP ZADJIUST STACK 


TMPTREO2,THPTRK ;CALCULATE TRACK 
TMPTRE,P.RTRK(RS) 3ZSTORE TRACK NUMPER 
P.MEXSC(RS),TMPSEC STORE MAXTPUP SECTOR 
P.MNSCCRS),TMPSFCe2  3STCRE MIBI®UN SECTOR 
TMPSECe2, TMPSEC ;CALCULATE DIPFERENCE 


23$ sIF=6, SKIP POULTIPLY 
-(SP) SMARE ROCW CA STACK 
SHINUY, (SP) sPUT TW MOLTIPLIER 


TMPSEC,-(SP) 3PUT SECTOR AUMBEP C&W STACK 


GS? 





RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
OZR6PB.P11 11-AUG-76 00:00 


4244 021602 005216 
4245 021604 004737 
4246 021610 116637 
4247 021616 062706 


4248 
4249 021622 063737 
4250 021630 113765 
4251 021636 006316 
4252 021640 066516 
4253 021644 063716 
4254 021650 012746 
4255 021654 004737 
4256 021660 012616 
4257 021662 063716 
4258 021666 005216 
4259 021670 061604 
4260 021672 022704 
021676 103421 


4261 
021700 005713 


4262 

4263 

4264 

4265 021702 001407 

4266 021704 021623 

4267 021706 103402 

4268 021710 020413 

4269 021712 103413 
021714 005723 
021716 005301 
021720 001367 


4270 
4271 
4272 
4273 
021722 005726 
021724 016565 
021732 016565 
021740 000416 


4274 

4275 

4276 
021742 162604 
021744 005300 
021746 001402 


054064 
000001 
000004 


001574 
001572 


000124 
001566 
000026 
054064 


001572 


001572 : 


001572 235: 
000126 


064741 


25$: 


2652 


30$: 
000124 
000126 


000002 
000004 
4277 
4278 
4279 
4260 
4261 
4282 
42863 
4284 
4285 
4286 
4287 
4268 
4289 
4290 
4291 
429? 
4293 
4294 
4795 


40S: 


021750 


021754 
021762 
021766 
021772 


021776 
022000 
022002 
022004 
022006 
022014 


000137 


013737 
104401 
004737 
005037 


012600 
012601 
012603 
012604 
012777 
000207 


021376 


001450 
057357 
012716 
177776 


177776 41$: 


45$: 


000100 157130 


Inc 
JSR 
nOVB 
ADD 


wacYii + | ages 


GENERATE WEW RANDOM COMPAR 


01-DEC-77 14315 PAGE 90 


(SP) STNCREMENT DIFFERENCE 

PC, SMULT sCALCULATE SECTOR 

1( SP), TMPSEC sSTObE SECTCE 

#4,SP ZADJUST STACK 

THPSEC*2,TMPSEC ;CALCULATE SECTOR 
TMPSEC,P.FSEC( RS) Z;STOPE SECTCR HUMBER 

(sP) SPULTIPLY CYLTIBDER BY 3 
P.RCYL(RS ), (SP) 

TMPTRE, (SP) 30D TRACE 

#22-,-(SP) sPULTIPLICAND - 22 SECTORS/TRACE 
PC, SMULT 

(SP)¢, (SP) STHPCW AWAY HCST SICHIFICANT PITS 
TMPSEC, (SP) 3ADD SECTOR 

(sP) sCONSTANT FOR BAD TRACKS 

(SP),R4 3ADD HUMBER GP SECTORS 


8£410.°22.%39.30€22.%2.>01,84 SCRECK IF DATA TRABSPER EXCEECS CESK 


40$ 
(R3) 


30$ 
(SP), (R7)* 


(SP) 


P.RCYL(RS),P.CYLEC AS) 
P-RSEC(RS),P-SECT(RS) 


45$ 


CSP)¢,R4 
RO 
41$ 


20$ 


REPRI,PS 
@PAFO20 
PC, DROP 
PS 


(SP)¢,R0 

CSP )e,R1 

(SP )¢,R3 

(SP)¢,R4 

SIE, @sTrs 
PC 


sCALCULATE WEW DISK ADDRESS 


SCHECK TF BAD TRACK INTERVAL 

3 ExIST 

380, ISSUE COMMAND 

SCHECK TF IW BAD TRACK INTERVAL 
3G, CHECK WERT BAD TRACE 1 


SVES, CALCULATE BFW DISK ADDRESS 
gADJUST &2 

sDECKENFAT BAD PLCCR COUNT 

3T1F BOT O GET HEXT BAN BLOCK 


ZAOJUST STACK 

sLOaD CYLIBOES 

sLOAt TRACK AND SECTCR 
sPETURS 


sGET RUPBER CF SECTOR TRANSPEPREC 
SDECKEMFNT RECEWERATE COURT 

sDROP OPIVE CANBCT CENERATE 

3 RaNOOM CIS® AOCKESS 

sCET ANOTHER CISK ADDRESS 


sLOCK OUT REGGE AAD TTY THERRUPTS 

STYPE “UBABLE TO CERERATE KEW COMP ARD® 
sDROP DRIVE 

SALLCW RKOG INTERPUPTS 


ZRESTORE PO 

sRESTORE P1 

SPESTCKF R3 

SRESTCRE R4 

dALLOW TTY IBTERKUPTS 
SRETUPN 





fe¢ C112 


7 











RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30(1046) O1-DEC-77 14:15 PACE 91 
| DzR6P8.P11 11-AUG-76 00:00 GET AVAILIBLE BUFFER ROUTINE $€@ 0113 q 
: 4296 eSBTTL GFT AVAILIBLE BUFFER ROUTINE ‘ 
4297 
4298 022016 013746 177776 GETBUF: MOV PS,-(SP) #STORE PSW ON STACK 
4299 022022 013737 001450 177776 nov RKPRI,PS LOCK OUT aros TATERRUPTS 
a 4300 022030 013705 001320 “ov BWATTQ,FS CHECK If CCHPAND WAITING FCR BUFFER ( 
4301 022034 001424 BEQ 10$ sRETURE IF QUEUE IS EMPTY 
4302 022036 004037 022114 1$% JSR RO, BUFFAL ALLOCATE BUFFER 
- 4303 022042 022106 10$ 3ROT ENCOGH HEMCRY RETUFR J 
4304 022044 004037 050766 JSR RO, Q.POP CET WEXT PARPETER BLOCK FRCH 
4305 022050 001320 BwAITO 3 BUFFER WAIT QUEUE 
J 4306 022052 005726 tst (SP)¢ PADIUST STACK ( 
4307 022054 005037 177776 CLR Ps PALLCW RKOG INTERRUPTS 
4308 022060 004737 022532 JSR PC,LDDATA LOAD BUFFER 
‘ 4309 022064 004037 050706 JSR RO, Q.PUSH PUT PARAMETER BLOCK On ( 
4310 022070 001324 crurro 2 CCHHARD THITTATICN QUEVE 
4311 022072 013737 001450 177776 nov REPRI,PS LOCK OUT aros THTERRUPTS 
- 4312 022100 013705 001320 MoV BWAITO,RS CHECK TF COMPAND WAITING FCR BUFFER 4 
4313 022104 001354 BRE i$ pVES, TRY TO ALLCCATE BUFFER 
4314 
7 4315 022106 012637 177776 10$: nov (SP )+,PS sRESTORE PsW ( 
4316 022112 000207 RTS Pc PETURN 
J ( 
J J 
J J 
J 
J q 
J ( 
J ( 
. ( 
7 ( 
7 ( 
- ( 
J ( 
Zz? 





RK611/RKOG PERFORMANCE EXERCISER MAINDEC DZROP-8 


DZR6P8.P11 


4317 
4318 
4319 
4320 
4321 
432? 
4323 
4324 
4325 
4326 
4327 
4328 
4329 
4330 
4331 
4332 
4333 
4334 
4335 
4336 
4337 
4338 
4339 
4340 
4341 
4342 
4343 
4344 
4345 
4346 
4347 
4748 
4349 
4350 
4351 
4352 
4353 
4354 
4355 
4356 
4357 
4358 
4359 
4360 
4361 
4362 
4363 
4764 
4365 
4366 
4367 
4368 
4369 
4370 
4371 
4372 


022114 
022116 
022120 
022122 
022126 
022132 
022134 
022136 
022142 
022144 
022150 
022154 
022156 


022160 
022162 
022164 
022166 
022170 
022172 
022174 
022176 
022200 
022202 
022204 
022206 


022210 
922212 


022214 
022220 
022224 
022226 
022230 


11-AaUG-76 00:00 


010446 
010346 
010146 
016501 
010165 
005401 
006301 
013704 
001420 
012703 
022704 
101001 
000000 


012346 
060116 
103411 
021316 
001423 
101010 
005723 
005726 
005304 
001366 
011000 
000437 


005726 
000774 


014365 
011365 
012613 
005720 


112765 177777 000145 


000012 
000130 
001664 


001666 
000011 


000132 
000010 


MACY11 30€1046) O1-DEC-77 14315 PAGE 92 
BUFFER ALLGCATION ROUTINE 


eSBTTL BUFFER ALLOCATION ROUTINE 


FP SAAAAAAAARAARAAAAAAARAARAAARAARAAADARAATARARAARAAARAAAAAAREROARAAADARD 


37 

3* THIS ROUTINE WILL TRY TO ALLOCATE A HAIN PEWPORY BUFFER 
2* If WEWORY IS AVAILABLE. (CALLED BY FRICKITY 7) 
3* 

3* REGISTER USE 

3 e sce see ae ee 

3* 

3* R1 wORD COUNT * 2 

9° a3 FREE PLOCK TARLE INDEX 

3* ka FREE BLOCK TABLE COUAT 

2* RS PARAMETER BLOCK ADDRESS 

3* 

Z*CALL JSh RO, BUPFAL 

aw <ADDRESS OF BUFFER MEMORY WOT AVAILABLE ROUTINE>D 
3* RETURN <BUFFER ALLOCATED> 


FP eeAaeeaaaeeeaaansaeaKagaganannanesaaaanagnsasasasaaaagesaaaaeaes 


BUFFAL: MOV 
uov 
MOV 
MOV 
nov 
WEG 
ASL 
“OV 
BEQ 
MOV 
CMP 
BHI 
HALT 


1$3 “Ov 
aDD 
BCS 
CMP 
BEQ 
BHI 
Tst 
Tst 
DEC 
BWE 
2$3 MOV 
BR 


552 TST 
BR 


10$: mov 
uov 
mov 
TST 
nOVB 


R4,-(SP) 
R3,-( SP) 
R1,-(SP) 
P.WC(RS),R1 
R1,P.PUC( RS) 
R1 


R1 
FBLKC,R4 
2$ 
#PBLKT,R3 
89.,R4 

is 


(R3)¢,-CSP) 
Ri,( SP) 


5$ 
(R3),CSP) 
15$ 


sSTOKE R4 OF STACK 

sSTCKE RZ OH STACK 

sSTORE R1 OW STACK 

sSTORE WORD COURT 

sSTOKE WCRO CCURT 

sGET ACTUAL BORD COUNT 

SPULTTPLY WORD COUNT BY 2 

SSTORE FREE BLOCK TABLE ADDRESS 
SRETURM, IF BC BLOCKS AVAILABLE 
3LOAD ADORESS OF FREE BLOCK TABLE 
SHANG If PREE BLCCK COURT IS CREATER 
3 OF ECUAL IC 9 


sSTORE BECINNING CF FREE BLCCK 
30D WCRD CCURT 

sCHECK ITP ADCRESS OVERFLOW 
sCHECK IF ERCUGH ROCK 

sYES, ELIMIRATE BLOCK 

sYES, SHCRTER BLCCK 

ZADIUST RF 

ZADJUST STACK 

SDECREMENT FREE BLOCK COURT 
SFRAMINE WERT FREF PLOCK 
sLOAD RETURN ADDRESS 
sRETURD 


ZACJUST STACK 
sPETURN 


-(K3),P.RBAL(RS) 3LOAD BUS ADDRESS 
(P3),P-PALCCRS) ;LCAC BUS ADDRESS 


(SP )¢,(R3) 
CRO De 


#-1,P.BUFFC(RS) 


sLOACD NEW BASE 
ZADJUST RETURN 
STNDICATE THAT BUFFER HAS BEEN ASSIGNED 


Sec 0114 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 
11-AUG-76 00:00 


DZR6PB.P11 


4373 
4374 
4375 
4376 
4377 
4378 
4379 
4380 
4361 
43862 
4363 
4384 
4385 
4386 
4387 
4388 
4389 
4390 
4391 
4392 
4393 
4394 


022236 


022240 
022242 
022246 
022252 
022254 
022256 
022260 
022266 
022272 
022274 


022276 
022300 
022302 
022304 
022306 
022310 
022312 
022314 


000423 


010301 
014365 
011365 
005726 
005721 
005720 
112765 
005337 
005304 
001404 


012123 
012123 
005304 
001374 
012601 
012603 
012604 
000200 


000137 
000010 


177777 
001664 


000145 


MACY11 30€1046) 01-DEC-77 14315 


BUFFER ALLOCATION ROUTIWE 


15852 


255 


SEG 0115 
25$ sRETURD 
R3,R1 sSTORE WORD COURT 
-(R3),P-RBALCRS) 
(R3),P.BALOCRS) ;LCAC BUS ADDRESS 
(SP) sADJUST STACK 
(R1 Do sADJUST R81 
(RO)* JADJIUST RETURN 
@-1,P.BUFFC(RS) sINDICATE THAT BUPFER HAS BEER ASSICHED 
FRLKC SDECRENENT PREE BLOCK COURT 
R4 SDECREMERT REPATA BLOCK COURT 
23$ dT? Of RETORD 
CR1 do, (RI DO STRAUSFER TWO WORDS 
(R1)¢,(R3)¢ 
ka SDECKENERT REPATHDING BLOCKS TC BE ADJUSTED 
20$ 3TF BOT 0, TRANSFER BEXT TWO WORDS 
(SP)*,R1 sRESTORE R1 
(SP)¢,R3 sRESTORE 3 
(SP)¢,R4 SRESTORE P4 
kO sRETURS 


Kq 








é 
REG11/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-8B MACY11 30€1046) 01-CEC-77 14:15 PACE 94 
DZR6PB.P11 11-AUG-76 00:00 BUFFER RELEASE ROUTINE SEG 0116 é 
4395 eSBTTL BUFFER RELEASE ROUTINE e 
3 
— FP TMAAAAARAAAAAAARAAARARARAAARARAAARAHRIRARAAARHRARHARAAAAARAHRERHEAAALE 
4398 2* 
4399 3* THIS ROUTINE WILL RELEASE BUFFER USED. ¶ 
4400 3* (MUST BE CALLED IN PRIORITY 7) 
4401 3* 
4402 3* REGISTER USE @ 
440 3 3 e esoaomowmes men 
4404 3* 
4405 3* RO WEW END OF PREG BLOCK TABLE @ 
4406 3* R1 LAST ADDRESS OF RELEASED BUFFER 
4407 3* R3 FREE BLOCK IBDEF 
4408 Bf Ra FREE BLOCK CoUNT @ 
4409 3? RS PARAMETER BLOCK ADDRESS 
4410 3* (sP) BEGINRING ADDRESS OF RELEASED BLOCK 
4411 3* € 
4412 3*CALL JSR PC, BUPREL 
4413 3* RETORN 
4414 3* | 
4415 J FSAAAAAASAAA AAAAAARAARAAKAARARARRAARAARARHAAAAREARAAAAHAAARARAEHAEADE 
4416 
4417 022316 010446 BUFREL: MOV R4,-(SP) pSTORE R4 OW STACK @ 
4418 022320 010346 nov R3,-(SP) sSTORE R3 ON STACR 
4419 022322 010146 nov R1,-(SP) STORE Rl OW STACE 
4420 022324 010046 nov R0,-(SP) STORE RO OR STACE @ 
4421 022326 105765 000145 TSTB P.BUFF(RS) SCHECK YF BUFFER ASSIGNED 
4422 022332 001472 BEG 25$ 380, RETURN 
4423 022334 105065 000145 CLRB P.BUFF(RS) 3CLEAR BUFFER ALLCCATED @ 
4424 022340 016501 000130 nov P.RWC(RS),R1 STOKE ALLOCATED WORD COUNT 
4425 022344 005401 NEG R1 gCET ACTUAL WORD COUNT 
4426 022346 006301 ASL R1 MULTIPLY BY 2 q 
4427 022350 016546 000132 nov P.RBAL(RS),-(SP) sSTORE BUFFER ADDRESS 
4428 022354 061601 AOD (SP),R1 CALCULATE PIWAL ADDRESS 
4429 022356 012703 001666 nov gPBLKT,P3 3LCAC PREE PLCCR TAPLFE ADDRESS @ 
4430 022362 013704 001664 nov FBLKC,R4 STORE FREE BLOCK COUNT 
4431 022366 001424 BEQ 8s 3ADD FREE BLOCK e 
4 
4433 022370 022301 15: cwe (R3)¢,R1 sCCWFARE ENC CB BUFFER AND PREE ELCCK 
4434 022372 001427 BEQ 10$ ZEQUAL MERGE BLOCES 
4435 022374 101005 BHI 58 #LESS THEW ADD FREE BLOCK q 
4436 022376 022316 CMP (R3)*,(SP) SCOMPARE BECINAIAC CF BUFFER 
4437 3 ABD END CE FREE PLOCE 
4438 022400 001426 BEQ 15$ ZEGQUAL MERGE @ 
4439 022402 005304 DEC R4 DECKEMENT PREE BLOCK COUNT 
4440 0272404 001371 BNE 1$ 360 10 NEXT FREE BLOCK 
4441 022406 000414 BR 8s 3CC aDD BLCCR é 
4442 
4443 022410 010446 5$: mov R4,-(SP) 3PUT REPAINTAG COUNT ON STACK 
4444 022412 006316 ASL (SP) PPULTIPLY BY 4 é 
4445 022414 006316 ASL (se) 
4446 022416 005743 Tst -(R3) sDECRENENT P3 BY 2 
4447 022420 062603 ADD (SP )o,R2 SCALCULATE OLD END OF FREE PLOCK TAPLE ¶ 
444® 022422 010300 nov R3,R0 
4449 022424 062700 000004 ADD #4,R0 CALCULATE WEW EAD OF FREE BLOCK TABLE 
4450 022430 014340 6$3 MoV -(R3),-(RO) s¥OVE TABLE 49 € 
| 





RKG11/RKOG PERFORMANCE EXERCISER PATNDEC DZR6P-8 


DZR6PB.P11 


4451 
4452 
4453 
4454 
4455 
4456 
4457 
4458 
4459 
4460 
4461 
4462 
4463 
4464 
4465 
4466 
4467 
4468 
4469 
4470 
4471 
4472 
4473 
4474 
4475 
4476 
4477 
4478 
4479 
4480 
4481 
4482 
4483 
4484 
4465 
4486 
4487 


022432 
022434 
022436 


022440 
022444 
022446 
022450 


022452 
022454 


022456 
022460 
022462 
022464 


022466 
022470 
022472 


022474 
022476 
022500 
022502 
022504 
022506 
022510 
022512 
022514 


022520 
022522 
022524 
022526 
022530 


11-AUG-76 00:00 


014340 
005304 
001374 


005237 
012623 
010123 
000423 


012643 
000421 


005726 
005304 
001402 
021301 


001402 
010143 
000412 


010300 
005743 
005720 
006304 
005304 
012023 
005304 
001375 
005337 


012600 
012601 
012603 
012604 
000207 


001664 


001664 


10$: 


15$: 


16$: 


20$% 


21$: 


2552 


MACY11 30€1046) O1-DEC-77 14:15 PACE 95 
BUFFER RELEASE ROUTINE 


~(R3),-(RO) 
k4 
6$ 


FBLKC 

(SP) e,(R3)0 
R1i,CR3)¢ 
25$ 


(SP)¢,-(R3) 
25$ 


16$ 
(R3),R1 


20$ 
R1,-(P3) 


(RO), (R3DO 
R4 


21$ 
FBLKC 


(SP)e,RO 
(SP)¢,R1 
(SP)¢,R3 
CSP) o,R4 
PC 


SCECKFHEST PREE BLOCK CCURT 
sTf BOT ZERO, COURT 


STNCREMERT PREE BLOCK COUNT 
sSTOKE PECIRAIBC CF FREE BLCCE 
sSTORE ERD OF FREE BLOCK 
SRETURG 


SLOAD BECTERING OF FREE BLOCK 
sRETURG 


sADJUST STACK 

SDECRENENT PREE BLOCKS LEFT 
3¥O BORE FREE BLOCK ADJUST EuD 
SCHECK If RELEASED BLOCK ERD= 
3 PEEE BLOCK BECINRING 

sYES, MERGE BLOCKS 

SLOAD END OF FREE BLOCK 
sRETORS 


sSTORE R3 FOR BUFFER MOVEPERT 
sADJUST RI 

JADJUST RO 

sMOULTIPLY COUNT BY THO 
SDECRENENT TRANSFER COURT 
SMOVE TABLE ENTRY 

sDECKEMERT CCUNT 

31F BOT 0, CONTINUE HOVE 
SDECKEMFNT PREE BLOCK COUNT 


SRESTORE RO 
SRESTORE R1 
SRESTORE R3 
SRESTCRE R4 
sPETURS 


see 0117 


mq 








RE611/RKO6 PERFORMANCE FRERCISER MAINDEC DZP6P-B 


DZR6PP.P1I1 


4488 
4489 
4490 
4491 
4492 
4493 
4494 
4495 
4496 
4497 
4498 
4499 
4500 
4501 
450? 
4503 
4504 
4505 
4506 
4507 
450 
4509 
4510 
4511 
451? 
4513 
4514 
4515 
4516 
4517 
4518 
4519 
4520 
4521 
4522 
4523 
4524 
4525 
4526 
4527 
4528 
4529 
4530 
4531 
4532 
4533 
4534 
4535 
4536 
4537 
4538 
4539 
4540 
4s41 
4542 
4543 


02253? 
022*34 
022536 
022540 
022542 
022544 
022550 
022554 
022556 
022564 
022566 
022570 
022572 
022574 


022600 
022604 
022606 
022610 
022612 
022614 
022616 


11-AUG-76 00:00 


010446 
010346 
010246 
010146 
010046 
016504 
016501 
005401 
122765 
001005 
005024 
005301 
001375 
000137 


116500 
010046 
006316 
006316 
006316 
006316 
050016 


000132 
000130 


000121 


022744 
000121 


000001 


MACY11 30(1046) O1-LFC-77 14:15 PACE 96 


LOAD DATA BUFFEP 


eSBTTL LOAD DATA BUFFEP 


pp MMA eAaaraanenenensavaenasaansanaraaneasasaanessssasaeasananaeene 


3*CALL 


THE REGISTEPS BE USFD AS FPCLLONS: 


REGISTER USE 
PS ADDRESS OF PARAWETER PLOCE 
4 BUFFER ADDRESS 
R3 PATTEPH ADOPESS 
©2 WCRDS LEFT Ik SECTOP 
R1 wCRD COUNT 
RO PATTERN COURT 
JSR PC,LODATA 
RETURN 


THE DATA WILL LOOK AS FOCLLGWS: 


' cPv ID i PAT 1 Pat ' woRD 0 

{ NO. OF PAT. WORDS (MH) § NO. OF PAT. BORES (WH) F BORD 1 

! RANDCM OATA ' wears 2 

i 1 70 uel 
— — — —— — — — — * 

ZPRC FILL § WCRDS be2 
t 1 TO 255 


FF RMAAMAAAAAARARAARAARARAHRAAAAAARARARARALARAAAAAAARARARARARARARAAAAAARAARAAED 


LDOATA: MOV R4,-(SP) sSTCRE P4 OW STACK 
mov R3,-(SP) sSTCKF #3 CR STAC 
MOV R2,-CSP) sSTOKRE ©2 ON STACK 
MOV R1,-(SP) sSTOKE R1 OW STACK 
“ov RO,-( SP) sSTCRE PO CK STACK 
MoV P.RPALC(RS),R4 sCGET BUS ADTRESS 
“ov — ate sSTORE WORD COUNT 
NEG sGET POSITIVE KOMBER FOR WORD CCUAT 
cvpe —1 CWNDCRS) sCHECK IPF REAC DATA 
BNE 58 3NO, LOAD BUFFER 
3$: CLR (R4)¢ SCLEAR BUFFFR BEFCRE READ 
DEC R1 sCHECK TF DONE 
BWE 3$ sWC, CCHTITAUE 
JMP 25$ SRESTORE RECISTERS 
585 MOVB P.DPAT(RS),RO SSTORE PATTERN CCUNT 


mov FO,-(SP) ZSTOBF PATTERR FCR FIRST WCED 
ASL (SP) SMULTTPLY PATTERA BY 4 FOR 
ASL (SP) 3 PEDURACY 

ASL (SP) 

ASL (SP) 

BIS RO, (SP) sSTOKE FIRST WORD OF SECTOR 


Ald 





RF611/RKO6 PERFORMANCE EXERCISER MATHDEC DZR6P-F 


OZR6PB.P11 


4544 022620 
4545 022626 
4546 022630 
4547 022634 
4548 022640 
4549 022642 
4550 022646 
4551 

4552 022652 
4553 022654 
4554 022660 
455* 

4556 022662 
4557 022664 
4558 022670 
4559 022672 
4560 

4561 022676 
4562 022700 
4563 022702 
4564 022704 
4565 022706 
4566 022710 
4567 022712 
456" 022714 
4569 022716 
4570 022722 
4571 022726 
4572 

4573 022730 
4574 022734 
4575 022740 
4576 

4577 022742 
4578 022744 
4579 022746 
4580 022750 
4581 022752 
4582 022754 
4583 022756 


11-A0G- 


113766 
006300 
016003 
012700 
011624 
162701 
022701 


101003 
012746 
000401 


010146 
111666 
012624 
012702 


012324 
005301 
001417 
005302 
005300 
001407 
005702 
001370 
162703 
012700 
000744 


162703 
012700 
000756 


005726 
012600 
012601 
012602 
012603 
012604 
000207 


76 00:00 


001364 000001 


004576 
000040 


000002 


000376 


000376 


000001 
000376 


000074 
000040 


000100 
000040 


LOAD DATA BUFFER 


11$: 


12$% 
13$: 


15$3 


1752 


20$3 
25$% 


MACY11 30€1046) O1-CEC-77 14315 PACE 97 


ee 


0 
PATTAB(RO),F3 


#32-,R0 
(SP), R44 
#2,P1 
#254.,R1 


12$ 
#254.4-(SP) 
13$ 


R1,-(SP) 
(SP ),1 (SP) 
CSP )o,(R4)¢ 
#254.,R2 


(R3)+, (R4)¢ 
R1 


(SP )¢ 
(SP), ,RO 
(SP)e,R1 
CSP )*,R? 
(SP)¢,R3 
(SP )e,R4 
PC 


3 Ob STACK 

PPULITPLY DATA PATTERN BY 2 
SLOAC DATA PATTERN ADDRESS 
SLOAD PATTERK COURT 


SSTOSE PATTEGR ANC CPU TD If 1ST SCRO 


SDECRENEBT WORD CCURT BY 2 
sCHPCR If REST OF SECTOR WILL BE 
3 WITTER 

3NO, USE 1 AS WORD COURT 

sSTORE SECTOR COURT = 254 


SSTORE PEMATEING WORD COUNT 
3ADD REDURDACY 

SSTORE WORD COURT IB 28D WORD 
sLOAC SECTOR WORD COUNT 


sSTORE DATA PATTERD 
SDECKEMERT WCRD CCURT 
sBRAECH IF FPIRISHED 
SDECRENENT SECTOR COUNT 
SDECREMEST PATTERN COUNT 

SIF ZERC, INITIALIZE PATTERS 
saRE WE AT END OF SECTOR 


380, CONTINUE TO LOAD DATA PATTER 


STMITIALIZE PATTEPR ADDRESS 
STIMITIALIZE PATTERN COURT 
SSTART WEXT SECTOR 


STUITIALIZE PATTEPR ADDRESS 
STMITIALIZE PATTER 
SPEPEAT PATTERS 


sADJUST STACK 
SRESTCRE RO 
SRESTORE R1 
sRESTORFE P2 
SRESTCKE R3 
SPESTORE P4 
sRETURN 


SEG 0119 


B/0 








RF611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B8 


DZR6P8.P11 


4564 
4585 
4566 
4587 
4566 
4589 
4590 
4591 
4592 
4593 
4594 
4595 
4596 
4597 
4598 
4599 
4600 
4601 


022760 


022766 
022770 
022776 
023000 
023006 
023014 
023020 
023024 


023026 
073030 


023032 
023034 


11-AUG-76 00:00 


032777 


001017 
013765 
001413 
016565 
016565 
005465 
004737 
023032 


005720 
000200 


011000 
000200 


000002 


001362 


000010 
000012 
000222 
023036 


156152 


000220 


000214 
000222 


MACY11 30€1046) O1-DEC-77 14:15 PAGE 98 


FIND FIRST DATA ERROR 


«SBTTL FIND FIRST DATA ERROR 


BUFERI: BIT 


BWE 
nov 
BEQ 
“ov 
nov 
BEG 
JSR 
10$ 


S$s Tst 
RTS 


10$: HOV 
RTS 


#SW1,0SWk SCHECR IF IWHIBIT SOFTWARE DATA 
3 CCHPARE 
sYES, RETURN 


5$ 
——9—9 210 40 COMPARISON LENCTE 
$ 


3TF BO PORE COMPARISONS, RETURN 
P.BALO(RS),P.FRHO(RS) ZsLOAD ADDRESS OF START OF SECTOR 
PoWCCRS),P.BPCPCRS) 3LCAD TRANSFER LENGTH 


P.BFCP(RS) sMARE IT POSITIVE IT POSITIVE 
PC, CMPBUF 300 COMPAPISOGH 
ZERRCR RETOUR 
CRO D+ sADJUST RO FOR RETURN 
RO sPETURG 
CPO), PRO sLOAC EPROR RETURN 
RO sRETURG 


c/o 











RKG11/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-B MACY11 30(1046) O1-CEC-77 14:15 PAGE 99 

DZR6PR.P11 11-AUG-76 00:00 COMPARE DATA RUFFER SEC 0171 | 
4602 eSBTTL COMPARE DATA BUFFER ‘ 

0 

—8D FP TAAAAARAAAAAARAARAAAAAAAARAARARARAAAARAHERAAHASAHORAHHAAHARARAEEA 
4605 3* 
4606 2Y THE REGISTERS WILL BE USED AS FOLLOWS: | 
4607 3* 
4608 3* REGISTER USE 
4609 3* —2 ome | 
4610 3* 
4611 3* RS ADDRESS OF PARAWETER PLOCR 
4612 3* P4 BUFFER ADDRESS q 
4613 3* P3 PATTERN ADDRESS 
4614 3* R2 SECTOR WORD COUNT 
4615 3* Rl WCRDS OR SECTCR WRITTED q 
4616 3* P0 PATTERN COURT 
4617 3* 
461° Z*CALL JSR PC, CMPBOF q 
4619 3* <ADDRESS OF COMPARISON ERPOR PETURND> 
4620 3* RETURN 
4621 3* q 
4622 3* (SP) WUMPER CF SOFT CATA COMPARES 
4623 3* (SP+2) WORD COUNT 
4624 3? q 
4625 3 pe eeeanaenenaanananenae aegeaeenananenaaaanaaaanananaaaaneaaneaerasanana 
4626 
4627 023036 010446 CMPBUF: MOV R4,-(SP) sSTORE P4 q 
4628 023040 010346 uhr R2,-(SP) #STORE R3 
4629 023042 010246 MoV R2,-(SP) pSTOKE R2 
4630 023044 010146 mov R1,-(SP) 3STORE Ri q 
4631 023046 010046 MOV 0,-(SP) #STORE RO 
463? 073050 016504 000214 MoV PeEPHD(RS),04 3CET START ACDRESS 
4633 023054 016546 000222 MoV P.BFCP(RS),-(SP) 3GET COMPARE COURT | 
4634 023060 016546 000220 MOV P.CMLC(RS),-(SP) 3LOAD WUPBFR CF COWPARTSON 
4635 023064 00100? BNE 10$ COMPARE TF CCHPARE COURT ACT ZERC 
4636 023066 000137 023322 uve 40$ ZELSE GPTURR q 
4 
4638 023072 010465 000714 10$: mov R4,P.ERHD(RS)  j;LOAD SECTOR READ IN CASE OF FRRCR 
4639 023076 005002 CLE R2 3CLEAR CEFSF1 FRCP READ q 
4640 023100 012400 nov (P4)¢,R0 STORE 1ST WO°D (PATTERN INDEX) 
4641 023102 010003 MOV RO,R3 
4642 023104 042700 177760 BIC #177760, RO sFEFP LOW 4 BITS q 
4643 023110 042703 177417 BIC 9177417,R3 3¥ASK CPU IT 
4644 023114 006203 ASR R3 sSHIET 4 BITS RIGHT 
4645 073116 006702 ASR R3 q 
4646 023120 006203 ASR R3 
4647 023122 006203 ASR R3 
4648 023124 020003 CMP RO,P3 3CHECK FOR PATTERN PATCH q 
4649 023126 001066 BNE 30$ 38O, PEPGRT EPRCR 
4650 023130 005202 TC R2 ZTACKEMENT CEFSET 
esi 023132 005366 000002 DEC 2¢sP) ;DECREMENT CCPPARISCN COUNT q 
4652 073136 006200 13$: ASL RO s¥ULTIPLY INDEX BY 2 
4654 023140 016003 004575 —RX PATTAR(RO),R3 5SIEEF PATTFEN ACCKESS q 
4655 023144 126414 0000.1 CwPB 1(R4),(¢R4) CHECK WORD CCURT 
4656 023150 001055 BYE 3C$ 3"O, REPORT ERKCR 
4657 023152 012401 MoV (P4)¢,R1 STCHF WCRCS Ih SECTCR WRITTEN q 


Die 





RF611L/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


4658 
4659 
4660 
4661 
4662 
4663 
4664 
4665 
4666 
4667 
4668 
4669 
4670 
4671 
4672 
4673 
4674 
4675 
4676 
4677 
4678 
4679 
4680 
4681 
4682 
4683 
4684 
4685 
4686 
4687 
4668 
4689 
4690 
4691 
4692 
4693 
4694 
4695 
4696 
4697 
469" 
4699 
4700 
4701 
4702 
4703 
4704 
4705 
4706 
4707 
4708 
4709 
4710 
4711 
4712 
4713 


023154 
023160 
023162 
023166 
023172 
023174 
073176 
023200 
023204 
023206 
023210 
023214 
023216 


023220 
023222 
023224 
023230 
023232 
023234 
023236 
023240 
023242 
023246 
023252 


023254 
023256 
023260 
023264 
023266 


023270 
023272 
023274 
023300 
023302 


023304 
023310 
023312 
023320 


023322 
023324 


023332 
023336 
023340 
023342 
023344 
023346 
023350 


023352 
023354 


11-AUG-76 


042701 
005202 
005366 
005765 
001467 
005701 
001426 
012700 
022324 
001036 
005366 
001442 
005316 


001440 
005202 
022702 
001720 
005301 
001407 
005300 
001361 
012700 
162703 
000754 


005724 
001012 
005366 
001416 
005316 


001414 
005202 
022702 
001674 
000764 


110265 
022626 
01766€ 
000404 


022626 
062766 


105065 
012600 
012601 
012602 
012603 
012604 
000207 


005701 
001432 


00300 
177400 


000002 
000116 


000040 


000002 


000400 


000040 
000100 


000002 


000400 


006217 
000012 


000002 
000117 


00001? 


000012 


15$: 


20$: 


30$: 


40$: 


455: 


50$: 


BIC 
Inc 
DEC 
181 
BFG 
Ttst 
BEG 
nov 
cuP 
BRE 
OFC 
BEQ 
DEC 


BEG 
Inc 
CMP 
BEQ 
DEC 
BEQ 
DEC 
BWE 
nov 
suB 
BR 


151 
BWE 
DEC 
BEQ 
DEC 


BEQ 
IWc 
cup 
BEG 
BR 


MOVP 
Cre 
MoV 
BP 


CMP 
ADD 


CLRB 
Mov 
nov 
nov 
MOV 
MoV 
RTS 


Ttst 
BFQ 


WACY11 30(1046) O1-DFC-77 14315 PAGE 100 
COMPARE DATA RUFFER 


$177400,81 
R2 


2(SP) 
P.SMPL(RS) 
50$ 

R1 

20$ 

832.,P0 

CRI os (R4 Do 


#256.,R2 
10$ 
20$ 


R2,P.FRACC RS) 
(SP)¢,(SP)¢ 
@12(¢SP),12¢SP) 
4*$ 


(SP )o, (SP Do 
#2,12¢€SP) 


P.ECMP(PS) 
(SP )e,RO 
(SP )¢,R1 
(SP )e@,R2 
(SP )o,R3 
(SP )*,R4 
ec 


k1 
52$ 


sFEEP LOW BYTE 

STUCKENERT OFFSET VALUE 
SDECRENERT WORD CCUNT 
sCHECER TF SAMPLED CCHPAFE 


sYES, START SSMPLED COMPARE SEQUERCE 


SCHECKR TP SECTOR ALL ZEROES 

sVYES GC 70 ZERC FILL LOCP 

sLOAG PATTEPR COURT 

sCHECK PATTERR 

SPISCOMPARE ERROR 

sDECKEMEBT WCRE CCUBT 

380 MORE COMP ORISCHS 

SDECRENENT BUPBER OF SOFT 

3 DATA COMPAPE 

3HC MORE CCPPAETSCHS 

STUCHENENT OFFSET 

sCHECK IF COMPLETE SECTOR COMPARES 
sYES, STAPT BERT SECTOR 

SDECKERERT BUPBES CP WORDS WRITTES 
sTf ZERO, GO TC ZERO FILL LOOP 
JDECREMENT PATTERR COUNT 

SWEXT wORD 

SRETRITIALIVE PATTERR CCURT 
SPETMITIALIZE PATTERH ADDRESS 
sCHECK WERT BORD 


sCHECR 7ERG FILL CF PATTERN 
sPISCOMPARE ERROR 
SDECREMERT WCRO COURT 

3¥O PORE CCPPARTSCAS 
SDECKENPRT BUPBEG CF SOFT 

3 DATA COMPARES 

3¥O MORF COPPARTISCHS 
STRCREMEDT CEPSET VALUE 
sCHECR TF CCHPLETP SECTCR CCHPABEL 
sVYES, STAPT BEXT SECTOR 
SCOMPARE WERT WORT Ch 


sSTCKE OFFSET ADCRESS 
sADJUST STACK 

SLCAD ERROR KETURE 
sPETURD 


sADJUST STACK 
ZADJUST RETORA 


sCLEAR ECC CCPPARE FLAG 
ZRESTORE FO 

dRESTORE ®1 

SPESTORE P2 

SRESTORE R3 

SRESTORF °4 

sPETUPR 


sCHEC® TF ALL ZERCES 
sVES, TEST FCR ZEROES 


S86 0122 


&é76 








* 


RE611/REO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


OZR6PSB.P11 


4714 023356 
4715 023360 
4716 023362 


4717 
4718 023366 
4719 023370 
4720 023372 
4721 023374 
4722 023376 
4723 023400 
4724 073404 
4725 023406 
4726 023410 
4727 023412 
4728 023414 
023416 


4729 
4730 
4731 023420 
473? 023422 
4733 023426 
4734 023432 
4735 023434 
4736 023440 
4737 023442 
4738 023444 
4739 023446 
4740 023454 
4741 023456 
4742 023462 
023466 
023472 


4743 
4744 
023474 


4745 
4746 
4747 
4748 
4749 
4750 
4751 
4752 
4753 
4754 
4755 
4756 
4757 
47586 
4759 
4760 
4761 
4762 
4163 
4764 
4765 
4766 
4767 
4768 
4769 


073476 
023502 
023504 
023510 
023512 
023516 
023520 
023524 
023530 
023534 
023540 
023542 
023550 
023552 
073556 
023562 
023566 
023570 
023572 
023574 
023576 
023600 
023602 


11-AUG-76 00:00 


021314 
001351 
076601 


103443 
010146 
005301 
006301 
060104 
042701 
060103 
021324 
001403 
005216 
012602 
000732 


012602 
062702 
022702 
103421 
026602 
103416 
005714 
001317 
022766 
101010 
012702 
016504 
062704 
005714 
001303 


016504 
012400 
042700 
006300 
016003 
012401 
042701 
012702 
012700 
162701 
101430 
162766 
101664 
062702 
062704 
062703 
021413 
001245 
005316 
001652 
005300 
001355 
162766 


000002 


177700 


000002 
000377 


000002 
000377 000002 
000377 


000214 
000776 


000214 
177760 
004576 
177400 
000002 
000007 
000043 
000043 000002 
000043 


000106 
000006 


000011 000002 


WACYI1 30¢€1046) 


COMPARE DATA RUFFER 


51$: 


52$3 


55$: 


5752 


cup 
BRE 
cue 


BLO 
nov 
DEC 
ASL 
ADD 
BIC 
ado 
cup 
BEQ 
Inc 
nov 
BR 


MOV 
ado 
cup 
BLO 
cup 
BLO 
tst 
BWE 
cue 
Bal 
nov 
nov 
ado 
Tst 
BWE 


nov 
nov 
BIC 
ASL 
“ov 
mov 
BIC 
wav 
uor 
suB 
BLOS 
suB 
BLos 
ADD 
adD 
a400 
CMP 
BRE 
DEC 
BEG 
DEC 
BWE 
suUB 


CR3),CR4) 
30$ 
2(SP),R1 


R1,R4 
8177700,81 
R1,P83 
CRI), (R40 
$1$ 

(sP) 

(SP )o,R2 
30$ 


(SP )¢,R2 


2(SP),R2 
5S$ 
(R4) 


30$ 
€377,2(SP) 
55$ 

€377,R2 
P.ERHD(RS),R4 
#776,"4 


(R4) 
30$ 


P.ERHD(RS),R4 
(P4)¢,R0 
#177760,k0 

RO 


PATTAB(RO),RI 
(R4)¢,R1 
#177400,k1 


#35.,7¢SP) 
40$ 
#35.,R2 
#106,R4 
#6,°3 
(R4),(R3) 


57$ 
#11,2(SP) 


O1-OEC-77 14315 PAGE 101 


sCHECK FIRST WORD OF PATERS 
SPISCOMPARE, REPORT ERROR 
sCHECK TF ERCUGH WORDS READ FOR 
3 = PCUBDARY CCPPARISGR 

380, DO SAINPLE COPP ARE 

dSAVE SECTOR COUST 

SCALCULATE BHUPBER CF WORDS FROM START 
sCORVERT TC BYTES 

sCALCULATE WPERGRY ADDRESS 

sCET PATTERN ACORESS OFFSET 
SCALCULATE PATTERB ADDRESS 
sCURCK IF DATA WCRD IS CORRECT 
dVES, CHECK ZERO PILL 
SCALCULATE OFFSET 

gSTORE CRFSET 

sREPCPT ERACE 


sSTORE OFFSET 

SCALCULATE OCFFSET FOR START OF 7ERC FILE 
sCHECK IF BO ZERC FILL 
SYES, DO SAMPLE CCHPARE 
SCHECR WORD BAS READ 

3RG, DC SAMPLE CCPPARE 
SCHECR START OF ZERC FILL 
380, REPORT ERROR 

sCHECK TF LAST WORD READ 
3G, DC SAMPLE CCPPARE 
sLOAL OFFSET COUNT 

SLOAD START CF SECTOR 
SCALCULATE ERD CF SECTOR 
sCHUFCR Last BCbD Cr SECTCR 
SPEPORT ERRCE 


sSET START CF SECTCR 

sCET PATTERN TaCeEr 

3MASE OFF UNNECESSARY BIT 
SPULTIPLY BY 7? 

sCET PATTERW ACDSESS 

sCET SECTOR BORD COUNT 

SVASK OFF URBECESSARY BITS 
STMUTITEALIZE CPFSET 

SLCAC BUMCEP CE SAHPLES 
SSUBTPACT 35 FROM SECTOR WORD CCURT 
SCHECK IF ZC PILL ' 
sSUPTRACT 35 PROM BCRD COUKT 
sCHECK TP FIBISRED 

sCALCULATE OFFSET 

SDETEPMTBE ADDRESS CF CCHPAPE 
SDETERMTBE ACORESS CF PATTER 
sCHECK YF DATA CCRRECT 

34O, REPORT ERRCK 

SDECKEMENT HUMBER CF CUOPPARES 
sCHECr TF FIBTSRED 

sCHECK YF IF TIPE FOR WEXT SECTCE 
3NO, CHECK REXT SAMPLE 

JAOJUST WORD CCUKT 


Fle 











RE611/RKO6 PERFORMANCE EXERCISER MAINDEC DZP6P-8 MACY11 30(1046) O1-CEC-77 14315 PACE 102 
OZR6P8.P11 11-AUG-76 00:00 COMPARE DATA BUFFER SEC 0174 
4770 023610 101644 BLGS 40$ sCHECR TF FINISHED 
4771 023612 062704 000022 ADG #22,R4 SCALCULATE START CF BEXT SECTCR 
wah 023616 000137 023072 Jove 10$ 360 SERVICE BEXT SECTOR 
4773 
4774 023622 162766 000043 000002 605: SUB #35.,2¢SP) sSUPTPACT 35 PECK WCKD COUNT 
4775 023630 101634 BLOS 40$ sCHECK TF FINISHED 
4776 023632 062702 000043 400 #35.,F2 SDETERMIGE OFFSET 
4777 023636 062704 000106 400 #106,R4 SDETERMTBE ADDRESS OCF CCHPARE 
4778 023642 005714 Tst (R4) sCHECK TF DATA CCHERECT 
4779 023644 001217 BNE 30$ 380, REPORT ERRCR 
4780 023646 005316 OFC (se) SDECREMFRT ROPBER GF COPPARES 
4761 023650 001624 BEQ 40$ sBRABCH IF FPIRISHED 
4782 023652 005300 DFC RO sCHECR TF SAMPLE CCONT EXHAUSTED 
4763 023654 001362 BWE 60$ 3NO, CHECK WERT SAMPLE 
4784 023656 162766 000011 000002 508 #11,2(SP) sADJUST WORD COURT 
4785 073664 101616 BLOS 40$ sCHECK TF FIRISHED 
4786 023666 062704 000022 abo #22,R4 sCALCULATE START CF REXT SECTCE 
4787 023672 000137 023072 Jve 10$ 260 SERVICE WEXT SECTOR 


G1O 





RK611/RKO6 PERFORMANCE EXERCISER MAITNDEC DZR6P-B MACY11 30€1046) O1-CEC-77 14315 PAGE 103 
DZR6PB.P11 11-AUG-76 00:00 WORMAL COMMAND RETURN sco 01735 
4768 eSBTTL NORMAL COMMAND RETURN 
98 v v v Vv v 
4791 3* 
4792 3* THIS ROUTINE WILL HANDLE ALL WCRMAL CCRPARD TERMINATIONS 
4793 3* 
4794 3* CALLED ROUTINE USE 
4795 3* eeceeeecoeeeee coe one 
4796 3* 
4797 3* asuoau ASSIGNHHEST RGRMAL TERWIPATICS 
4798 3* CWTRL1 COMTEOLLER EGRCR 
4799 3* ABBORM DRIVE ERROR 
4800 y= EvcvYi1 WOKMAL ERROR RECOVERY 
4801 3* DATERR IRCORRECT DATA BUPFER 
4802 3* 
4803 3* ASSUMED REGISTERS 
4804 e 
4805 3* REGISTER CONTENTS 
4806 3 a —— —— —2 
4807 3* 
4808 3* RE ADDRESS OF PARMETER BLCCE 
4809 3° R2 ADDRESS OF REOG REGISTERS 
g e 
coat 3 pt eAeanaaaenaneananaaneneaagananasasagaaaeaassanaenanagaaeaneaaee 
4812 
4813 023676 004737 046664 NORMAL: JSR PC,1I.CSTS SCATHER CONTROLLEP STATUS 
49814 023702 032765 024000 000016 BIT SSPARICTO,P.CS1(RS) sCHECK TF ORIVE BUS PARITY CR — — TIPE COT 
peer 0273710 001010 BRE 2$ SYES, INDICATE CCHTBULLER FAULT 
4816 
4817 3 CHECK IF ANY OF TRE FOLLOWING ERRORS ARE SET IW CS2 
4818 3 UNIT FIELD ERROR 
4819 3 MULTIPLE DRIVE SELECT 
4820 3 PROGRAMMING ERROR 
4821 7 NON-EXISTENT MEMORY 
482? 3 NON-EXISTENT DRIVE 
4823 3 UNIBUS PARITY ERROR 
4824 3 WRITE CHECK ERROR 
4825 3 DATA LATE 
4826 023712 032765 177400 000020 BIT SUFEIMDSIPCE CREM IREDIUPE IWCEIDLT, F.CS2(R5) 
oe 023720 001004 BNE 2s 3YES, INIDICATE CCNTROLLER ERROP 
4829 3 CHECK IF ANY OF THE FOLLOWING ERRORS ARE SET IW REER 
4830 3 ILLEGAL FUNTICH COLE 
4831 a FORPAT ERPOR 
4832 3 DRIVE TYPE ERROR 
4832 3 ECC HARD 
4834 3 BAD SECTCR ERBCR 
4835 a HEADER WRC ERROR 
4836 3 CYLINDER ADDRESS OVERFLOW 
4837 3 DRIVE TIMING ERRGR 
4838 3 OPERATION INCCHPLFTE 
4839 3 DATA CHECK 
4840 023722 032765 131761 000034 BIT @ILC UPMTE TOTYE VTECH BSE UAVRC ICCEIDTE 1OPI VOCK, P.ERCRS) 
4841 023730 001405 BEG 3$ oRC, CHECK FCK OURFEPORT DPIVE ERGCES 
4842 023732 052737 000001 001560 28: BIS #BITO,ERCOAT 3SET CONTROLLER ERROR ACT FLAGGED 
4843 023740 000137 026426 Jue CNTRL1 ZREPORT CONTKOLLER ERROR 


S 
@®eeeeeee@eeeeeeeeeee ee ee @ @ 








RK611/RFO6 PERFORMANCE EXERCISER MAINDEC DZR6P-f 


OZR6PB.P11 


4844 
4845 
4846 
4847 
4648 
4649 
4950 
4651 
4852 
4853 
4854 
48655 
4856 
4857 
4858 
4659 
4860 
4°61 
4862 
4863 
4864 
4865 
4866 
4867 
4868 
48669 
4870 
4871 
4872 
4873 
48674 
4875 
4876 
4677 
4878 
4879 
4880 
4661 
4882 
4883 
4884 
4985 
4886 
4887 
4868 
4889 
4890 
4891 
4892 
4897 
4h94 
4695 
4896 
4897 
4898 
4699 


023744 
023752 


023754 
023762 
023764 
023772 


023776 
074004 
024006 
024014 


024020 
024024 
024026 
024034 
024036 
024044 
024046 
024052 
024054 
024060 
02406? 


024064 
024070 
024072 
024076 
024102 
024104 
024110 
024112 


024114 
024116 
024122 
024126 


024130 
024134 
024136 


024142 


11-AUG-76 00:00 


032765 
001004 


032765 
001405 
052765 
000137 


032765 
001005 
052765 
000137 


005737 
100017 
122765 
101007 
132765 
001003 
004037 
024062 
004037 
001324 
000207 


005765 
001417 
004737 
005737 
001367 
004037 
001330 
012605 


001762 
010537 
004737 
000763 


105765 
001402 
000137 


122765 


046016 


000070 


000010 
024766 


000001 


000200 
024766 


001560 
000121 
000040 
024506 
050706 


000150 


037464 
001562 


050766 


001562 
031224 
000210 
013770 
000117 


000034 


000036 
000212 


000014 
000212 


000001 
000001 


000001 


MACY11 30€1046) O1-CEC-77 14:15 PACE 104 


NORMAL COPMAND RETURN 


tad We Ve Ne We Be Ne Be 
an 
oo 


me Se Ne we 


4$3 


6$: 


7$3 
10$: 
1152 


205 


2252 


2252 


CHECK THE FCLLOWING EPRCR BITS TH RRERCORPEPORTED DRIVE ESECR) 
SEEK INCOMPLETE 
WON-EXECUTARLE DRIVE FUNCTION 
DRIVE DETECTED DRIVE BUS PARITY ERROR 
INVALID DISK ADDRESS 
WRITE LOCK ERROR 


UNSAFE 
BIT @SKIUWXFIDRPARTIDAE IBLE UNS, FERC RS) 
BNE 4s sYES,SET UNREPORTED ORIVE ERROR 
CHECK THE FOLLOWING ERROR BITS TH RKOS 

ac Low 

SPEED LOSS 

DRIVE OFF TRACK 
BIT BACLONSPOLSSICROT,P.CS(RS) 
BEQ 38 380, CHECK IF SPECIAL SEQUERCE 
BIS @BIT3,P.EPRC(RS) ZSET DRIVE ERRCR BOT REPORTED 
J¥P ABNORM sPROCFSS ERECE 
BIT #ORVUSE,P.PRSTC(RS) sCHECK IF DRIVE IN USE 
BRE 6$ sYES, CHECK IF SPECTAL SEQUENCE 
BIS GPIT7,P.ERRCRS) 3SET ONSCLITATED ATTENTION 
JMP ABNORM sPROCESS ERROR 
Ttst ERCONT SCHECK TE CONTECLLER ERROR HAS CCCURRED 
BPL 11$ 30, CONTINUE BORPAL PROCESSING 
CwPB @RDDATA,P.CMND(RS) sCRECK IF DATA TRAWSPER COPMABC 
BRI 78 340, RETSSUE COPHARD 
BITe @BITS,P.CPADCRS) ;CHECK IF SPECIAL COMMAND 
BWE 7$ sYES, REISSUE CCHPARD 
JSR RO, CHEADD SCHECK BUS AND DISK ADDRESS 
10$ SERRCR RETURN 
JSE RO,G.PUSH SENQUEVE PAPAPETE® BLOCK Ih 
crurro 3 CCMMAND IRITIATICON QUEVE 
RTS Pc sRETURN 
187 P.DSTTC(RS) SCHECK IF RETPY SEQUENCE 


BFEQ 32$ 3WO, CHECK TF DRIVE IS BEING ASSICBHED 


JSR PC, ERCVY1 9GO THECUGH ERECK RECOVERY 

Ttst ERRPRO sCHECR ITF ERRCR PROCESSING COMPLETE 
BWE 10$ 210, RETURN 

JSR RO,Q.POP SGET WEXT ERROR TC BE PROCESSED 
ERRPRO 

nov (SP) ¢,R5 SLOAC ADDRESS OF PAPAMETER PLOCK FCR 


3 WERT ERROR 
BEQ 10$ 3TF BO MORE ERRORS, RETURG 


nov RS, FRRPRC ZTMDICATE THAT FRECR IS BEIRG PRCCESSED 
JSR PC, ERcvy 3CO TRHROUGH ERRCR RECOVERY 
BP 20$ SCHECK TF ERRCR PROCESSING COMPLETE 


TtsTB P.ASSN(°5) sCHECK TF DRIVE IS BETWG ASSICHED 
BEQ 33$ 340, CHECK It SEE® OR RELEASE 
JMP ASWORP 3GO CONTINUE ASSICKPERT 


CMPB #SEEK,P.CPND(PS) 3CHECK IF SEEK IC PREVICUS POSITION 


SEG 0126 


Zz“ 


le 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PR.P11 


4900 
4901 
4902 
4903 
4904 
4905 
4906 
4907 
4908 
4909 
4910 
4911 
4912 
4913 
4914 
4915 
4916 
4917 
4918 
4919 
4920 
4921 
4922 
4923 
4924 
4925 
4926 
4927 
4928 
4929 
4930 
4931 
4932 
4933 
4934 
4935 
4936 
4937 
4939 
4939 
4940 
4941 
4942 
4943 
4944 
4945 
4946 
4947 
4948 
4949 
4950 
4951 
4952 
4953 
4954 
4955 


024150 
024152 
024160 
024162 
024170 
024176 
024202 
024204 


024206 
024214 
024220 
024222 


024224 


024230 
024232 
024240 
024246 
024252 
024260 
024262 
024266 
024270 


024272 
024300 
024302 
024310 
024312 
024320 
024324 
024326 


024330 
024336 
02434? 
024346 
024354 
024356 
024364 


024366 
024370 


024376 
024400 
024404 


024406 


11-AUG-76 00:00 


001416 
122765 
001021 
112737 
012762 
004037 
001314 
000207 


112765 
004037 
001324 
000207 


004037 


024062 
112737 
012762 
005037 
122765 
001004 
004037 
025100 
000417 


122765 
001013 
032765 
001407 
042765 
004037 
001324 
000207 


013737 
004737 
005037 
032777 
001043 
026565 
101010 


103404 
026565 


103003 
004737 
000435 


016546 


000140 
177777 


000300 
050706 


000140 
050706 


024506 


177777 
000300 
177776 
000121 


022760 


000131 
000200 


000200 
050706 


001450 
022316 
177776 
040040 


000110 


000106 


012716 


000166 


000001 


001502 
000000 


000001 


001502 
000000 


000001 


000001 
000014 
000014 


177776 


154564 


000154 


000152 


MACY11 30€1046) O1-DEC-77 14315 PACE 105 


WORMAL COMMAND RETURN 


2452 


2552 


WORM1® 


NORM2: 


28$: 


29$: 


BEQ 
cwPpe 
BWE 
Move 
nov 


3 §6<CSWITCR 14 OPTION) 
34$ SYES, RELEASE ORIVE 
@RELEAS,P.CMNDC(RS) SCHECK IF FELEBSE COPNART 


35$ 30, CHECK ADDRESS AND WORD COURT 
@-1,1.1SRkL STUDICATE TRAT AB INTERRUPT HAS BEEN TSSUED 
SINTR,RECSIC(R2) SFORCE AB INTERROPT SCAN DRIVE ATTENTIONS 
RO,G.PUSH sPUT PARAPTEE BLCCK ADDRESS ORF 

3 DRIVE AVAILIABLE QUEUE 
Pc sRETURS 
@PELEAS,P.CMED( RS) 3FUT RELEASE CCMPARD IN PAPAPETER BLCCE 
RO,Q.PUSH SEMQUEVE PARAPETER BLOCK Ih 

3 COMMABD ITBITIATICH QUEUE 
Pc sRETURD 
RO, CHF ADD SCHECK WORD CCURT, RUS ADDRESS, 


3 SECTOR, TRACK, ABD CYLINDER 
ZERRCR RETURA ADDRESS 


#-1,1.1SRL STMDICATE TRAT AR INTERRUPT HAS BEER ISSUEL 
SINTR,RECSICR2) CO SCAW FOR DRIVE INTERRUPTS 
PS dALLGW RKOG INTERRUPTS 
@RDDATA,P.CHND(KS) 3CRECK IP READ DATA 
WORM1 3¥O, DO BOT COMPARE BUFFER 
RO, BUFERI sCHECR DATA READ 

SERRCR RETUPRA 
WORW2 SPELEASE BUFFER 
@WURTCHK,P.CMND(RS) SCHECK IPF WRITE COMMAND 
NORMZ 3NC, RELEASE BUFFER 
@U.WCK,P.PRST(RS) Z3CHECK IF BRITE CHECK ISSUE 
NORM2 sVES, RELEASE BUFFER 
@WU.WCK,P.PRSTCRS) sCLEAR WRITE PLAC 
RO,G.PUSH sPUT PARAMETER PLCCR Im 

3 CCWHAND IBITIATICN QUEDE 
PC ZRETURS 
REPRI,PS sLCCK CUT REG6 IRTERRUPTS 
PC, BUFREL sRELEASE BUPFER 
PS ZALLCW RKOG INTERRUPTS 
@SeStSW14,@SHR ZCHECK ITF IWKIBIT AUTOMATIC CESELECT 
33$ sYES, PUT PARAMETER BLOCK I 


3 AVAILIABLE QUEUE 
P.MXCD¢7(P5),P.PODR*Z(RS) ZCHECK TF MAXIMUM BONRER 

3 OF COMPARD HAVE PEEN ISSUED 
29$ 3NO, CHECK TF MAXIMUM NUMBER CF 

3 OF WORDS HAVE PEER TRANSFERRED 
28$ dYES, DROP DATIVE 
PoMICD(CRS),P.NCORCRS) ZCHECK IF PAXTRPUM BUMPER 

3 OF COMMANDS RAVE BEER ISSUED 


29$ 3¥O, CHECK TF MAXIMOM NUMBER OF 
3 WAVE BEEN TRABSFERRED 

PC, O0RCP 20605 DPIVE 

35$ ZALLOCATE BUFFER 


P.WFDe2(FS),-(SP) sSTICKFE BUPEFE CF WORDS PEAD CW STACF 


£@¢ 6127 


3/7o 








RE611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
11-AUG-76 00:00 


DZR6PS8.P11 


4956 
4957 
49586 
4959 
4960 
4961 
4962 
4963 
4964 
4965 
4966 
4967 
4968 
4969 
4970 
4971 
4972 
4973 
4974 
4975 
4976 
4977 
4978 
4979 
4980 
4981 
4982 


024412 
024416 
024424 
024426 
024432 
024434 


024440 


024442 
024444 


024450 
024452 


024454 
024456 
024460 


024462 
024464 
024472 
024476 


024500 
024504 


016546 
066566 
005516 
066516 
103410 
026526 


101010 


103405 
026526 


103753 
000404 


005726 
005726 
000747 


005726 
112765 
004037 
001324 


004737 
000207 


000170 
000160 


000162 
000114 


000112 


000140 
050706 


022016 


000002 


000001 


MACY11L 30€1046) O1-DEC-77 142315 PAGE 106 


RORMAL COMMAND RETURN 


30$: 
2152 


32$% 
33$3 


35$3 


nov P.NRDO4(R5),-(SP) 

A0D P.WURTO2Z(RS),2(SP) ZADD BUNBER OF WORDS WRITTEN 

aoc (SP) 

adD P.WURTO4(RS),CSP) 

BcsS 30$ 3D0ROP ORIVE IP CVERPLOW 

CMP P.MRUTO2Z(RS),CSP)¢ sCHECK IF PAXIPUM HUMBER OF WORCS 
3 HAVE BEER TRARSFERRED 

BHI . 32$ 3G, PUT PAPAPETES BLOCK Ih 
3 «AVAILIABLE QUEUE 

BLO 31$ sYES, DROP ORIVE 

cup PoMXUTCRS),CSP)* SCHECK IPF PAXINUP BUMBER OF WORDS 
3 HAVE BEER TRARSFERRED 

BLO 28$ sYES, DROP DATIVE 

BR 33$ 380, PUT PAPAPETER BLOCK It 


3 AVAILABLE QuEUF 


Tst (SP)¢ sADJUST STACK 
Tst (SP )e sADJUST STACK 
BR 28$ sDROP DRIVE 

tst (SP) ZADJUST STACK 


Move @RELEAS,P.CMBD(RS) 3PUT RELEASE CCHPAND IN PARAMETER BOLCCE 


JSR RO, G.PUSH SENQUEUE PAPAPETER PLOCK It 
CrNita 3 COMMAND INITIATION QUEVE 
JSR PC, CETBUF sCET WEW BUFFER 

RTS Pc sPETURA 


SEC 012€ 


Kile 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC OZR6P-B 


DZR6PB.P11 


4983 
4964 
4985 
4986 
4987 
4988 
4969 
4990 
4991 
4992 
4993 
4994 
4995 
4996 
4997 
49986 
4999 
5000 
$001 
$002 
5003 
5004 
5005 
5006 
5007 
5008 
5009 
$010 
$011 
$012 
$013 
5014 
$015 
5016 
$017 
5018 
5019 
5020 
$021 
$022 
5023 
5024 
5025 
5026 
$027 
5028 
$029 
5030 
$031 
503? 
5033 
5034 
$035 
5036 
5037 
5038 


024506 
024512 
074514 
024522 


024524 
024532 
024534 
024540 
024542 
024544 
024550 
024554 


024556 
024564 


024566 
024572 
024574 
024576 
024600 
024604 
024606 
024612 
024616 
024624 
024630 


024634 
024640 
024642 
624646 
024652 


024654 
024660 
024662 
024664 
024670 
024674 


024700 
024704 
024706 
024712 
024716 


024720 
024724 
024726 
024732 
024736 
024740 


11-AUG-76 00:00 


005765 
001404 
052737 
000512 


032765 
001011 
016546 
005416 
006316 
066516 
026526 
001404 


052737 
000471 


016546 
005416 
105716 
001402 
105266 
0050 46 
116616 
005066 
116566 
066616 
005066 


022716 
101005 
162716 
005 266 
000770 


176526 
001027 
005046 
116516 
066616 
005066 


122716 
101005 
162716 
005266 
000770 


126526 
001005 
066516 
026516 
001410 
005726 


000022 
000002 


001400 
000012 


000012 


000001 


000003 
000002 
000004 


000002 . 


000002 
000026 
000026 
000002 
000026 


000005 
000002 
000002 
000003 
000003 
000002 
000027 


000002 
000030 


001560 


000016 


001560 


000002 


MACY11 30€1046) O1-DEC-77 14:15 PAGE 107 


CHECK BUS ADDRESS, WORD COUNT, SECTOR, TRACK, AND CYLINDEP 


eSBTTL CRECK BUS ADDRESS, WORD COUNT, SECTOR, TRACK, ABD CYLISDER 
CHKADD: TST 


10$: 


17$3 


18$: 


19$: 


20$3 


2152 


2252 


23$: 


BFQ 
BIS 
BR 


811 
BYE 
nov 
WEG 
ASL 
adD 
cuo 
BEG 


nov 
NEG 
TSTB 
BEQ 
InCB 
CLR 
MOVB 
CUR 
nove 
ADD 
CLR 


CMP 
BHI 
SUB 
Inc 
BR 


CMPB 
BNE 
CLR 
MOVB 
ADD 
CLR 


cMuPB 
BHI 
SUB 
INC 
BR 


cwPpe 
BNE 
ADD 
CMP 
BFQ 
Ttst 


P.WCRCRS) sCHECK IF WORD COURT ZERO 

6$ sYES, CHECK BUS ADDRESS 
sBIT1,EPCost dSET WORD COURT BOT EQUAL ZERO 
24$ sPEPCRT ERRCH 


tate SCHECK IF WICH BUS ADDRESS BITS SET 
10$ sYES, REPORT ERRGR 

PoWCCRS)o-(SP) sSTCKE WORD CCURT 

(SP) SPAKE IT POSITIVE 

(sP) SDETERMIBE RUNBER OF BITS 

P.BALO(RS),(SP) sDETERNIBE EXPECTED BUS ADDRESS 

P.BARC(RS),(SP)e sCHECK BUS ADDRESS 

175 3BUS ADDRESS COPRECT--CRECK CYLISCER, 

STRACK, AWD SECTOR 
#BIT2,EPCONT gSET BUS ADDRESS INCORRECT 
24$ SREPORT ERROR 


P.WCC(RS),-(SP) STORE WORD COUNT 


(SP) sMAKE IT POSITIVE 

(SP) sCHECK TF EVER RUPBER OF SECTORS 
18$ sYES, DO COMPARISOS 

1(SP) STNCRENEBT SECTOR COURT 

-(SP) SPAKE ROCH OB STACK 

3(SP),(SP) sSTORE BUMBER OCF SECTORS TRANSFERFED 
2(SP) SCLEAR LOCATION OF STACK 
P.SECT(RS),2(SP) sSTCRE STARTING SECTOR 
2(SP),¢SP) SDETERNIBE FINAL SECTOR ADDRESS 
2(SP) SCLEAR RUMBER OF TRACKS TRANSPERGED 
#22-,(SP) sCHECF FOR SECTOR CVERFLOW 

20$ 340, CHECK IF SECTOR CORRECT 
€22.,¢SP) SDECKEMENT SECTOR COUNT BY 22 ARD 
2(SP) 3 INCREMENT TRACKS TRABSFERRED 
19$ sCHECK POR SECTOR OVERFLOW 
P.DTS(RS),(SP)* CHECK IF FIBAL SECTOR CORRECT 
23$ 3NC, REPORT ERECE 

-(SP) 3¥AKE ROOM FOR TRICKS TRANSFERRED 
P.TRCK(RS),CSP) sSTORE STARTING TRACK 

2(SP), (SP) SDETERMIBE FIRAL TRACK ADDRESS 
2(SP) SCLEAR FIWAL CYLIBDER 

#3,(SP) sCHECK POR TRACK CVERPLOW 

22$ 30, CHECK FIBAL TRACK 

#3,( SP) SDECKEMENT TEACK COUNT BY 3 AnD 
2(SP) 3 INCREMENT CYLIBDER COUNT 

21$ sCHECK FOR TRACK CVERFLOW 


P.DTS*¢1(RS),(SP)e¢ ZCHFCR IF FIBAL TEACK CORRECT 
23$ STRAC® TMCORKECT ERROR 
P.CYLN(RS),CSP) sCALCULATE FINAL CYLINDER 
P.DCYL(RS),(SP) sCHECK IF CYLTADER CORRECT 

28$ sCCREECT GCC 1C WCRMAL RETUEE 
(SP)¢ ZADJUST STACK 


SEC 0125 


L/6 


, a rr rr rr) | a nr) a) a) a nr) a) a) a a) a a) fn) =f | 
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DZR6PB.P1i1 11-AUG-76 00:00 CHECK BUS ADDRESS, WORD COUNT, SECTOR, TRACK, AWD CYLINDER Se@ 0136 

$039 024742 052737 000010 001560 BIS #8I1T3,ERCONT SSET INCORRECT SECTOR, TRACK, OR CYLISDES 

5040 024750 004737 026426 24$3 JSR PC, CUTRLI SREPORT ERROR 

5041 024754 011000 MoV (RO) RO 21040 RO FOR ERRCEH FPETURE 

5042 024756 000200 RTS RO sPETURG 

5043 

5044 024760 005726 25$: Ttst (SP )+ SADJUST STACK 

$045 024762 005720 TST CRODe sADJUST RO 

5046 024764 000200 RTS RO SWORMAL RETURN 
€ 
€ 
€ 
@ 
@ 
@ 
e 

Mle 

















| 
REG11/REO6 PERFORMANCE EXERCISER MAINDEC 0ZR6P-B MACY11 70€1046) O1-CEC-77 142315 PAGE 109 | 
DZR6PR.P11 11-AUG-76 00:00 ABNORMAL TERMINATION stc 612; @ 
5047 -SOTTL APNORPAL TERMINATION e 
5048 : 
5049 024766 004737 051126 ABNORM: JSR PC, C.PMCY 7PEPCVE PARAPETES BLOCK FRCP CCPPPRD 
5050 3 IBITIATION GUEDE 
5051 024772 032765 000100 000014 BIT —* PRST(RS) sCHPCE TF COMPARD TINE OUT € 
5052 075000 00140? BEQ 3"O, PROCESS ABRCRNAL TERWINATICS 
5053 025002 000137 025172 J¥P + JUKE TC TIPE CUT RCUTINE e 
5054 
5055 025006 005737 001560 3$3 TST ERCONT ;CHECK IF CONTROLLER ERROR PAS CCCURRED 
5056 025012 100010 BPL 10$ 380, CONTINUE ERRCR PROCESSING 
5057 025014 032765 000001 000014 BIT @DRVUSE,P.PPSTCRS) 3CHECK FCH UNSCLICATEO INTERRUFT € 
5058 025022 001403 BEG 5$ 3YES, DO WOT ERCUEVE PARAMETER BLCCE 
5059 025024 004037 050706 JSR R0,0.PUSH JFNQUEUE PARAPETER PLOCE Im 
5060 0275030 001324 CINITo 9 CCHMANOD TRITTATICH QUEUE € 
5061 025032 000207 5$3 RTS pc sPETUPRN 
5062 
5062 0275034 032765 000001 000014 105: BIT #DRVUSE,P.PRST(RS) sCHECK IF DRIVE IN USE € 
5064 025042 001004 BRE APNOOO 3YES, CHECK If CEIVE PETNG ASSIGAEC 
5065 025044 052765 000200 60021? BIS @21T7,P.EPR(RS) INDICATE UNSOLICATED INTERRUPT 
5066 025052 000420 BP APNOO1 sCHECK TF ERROR IS BEING PROCESSET € 
5007 
5068 025054 005765 000150 APNOOO: TST P.DSTT(RS) ;CHECR IP CURRENTLY UNDERGOING 
5069 3 ERROR PROCESSING € 
5070 0275060 001415 BFQ A®NO01 jG, CHECK TF ERRCR PRESEWTLY BEING PROCESSEC 
5071 025062 100402 BYI 17s ZERRGR FROUEUED 
5072 0275064 000137 042262 Jup ERCWY2 ZFRRCR PECCVERY ROUTINE € 
5073 
5074 025070 052765 000100 000212 13$: BIS #P1T6,P.ERR(RS) 3SET ERROR WHILE ENQUEUED IW ERRCE CUEUF 
5075 025076 000207 RTS PC sPETURN 6 
5074 
5077 25100 013737 001450 177776 DATERR: HOV REPPI,PS sLOCK REOG INTERRUPTS 
5078 025106 052765 000004 000212 BIS #PRIT2,P.ERRCRS) 3SET SOFTWARE DETECTED DATA ERHOK 6 
5079 
5080 025114 012765 100200 006150 ABNOO1: MOV SPITISIPIT7,P.OSTTCRS) ZSET ERRCK ERQUEDED AND FISST ERFCE 
5081 025122 005737 001562 TST ERRPRO CHECK JF ERRCR IS BEING PROCESSEC € 
5082 025126 001015 BRE 5$ 3YES, GO EMQUEUF FRROR 
5083 025130 010537 00156? 25: mov RS, ERRPRO sLOAC ERROR BEIRG PRUCESSED 
5084 925134 004737 031224 JSR PC, FRCVY ZSTART FRRCR RECCVERY 6 
5085 025140 005737 001562 TST EPRPRO ;CHEC® YF ERRCR PROCESSIAG THROUGP 
5086 025144 001005 BYE 3s 340, RETURN 
5087 025146 004037 050766 JSR R0,Q.POP #GET WEXT ERKCR ERQUEVED @ 
5088 025152 001330 ERRPRO 
5089 025154 012605 nov (SP)¢,R5 zUudat R© FOP ERFCP PROCESSING 
5090 025156 001364 BNE 2$ 31F ROT ZERO PROCESS WEXT ERROR € 
5091 0275160 000207 3$3 RTS PC sPETUGN 
5092 
5093 025162 004037 050706 5$: JSR RO,Q.PUSH 3PUT PARAMETER BLCCE ON € 
5094 075166 001330 ERRPRO 3 ERRGR PROCESSING QUEVE 
5095 075170 000207 RTS pc pPETUPN e 
€ 
AU € 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


O7R6PR.PI1 


5096 
5097 
5098 
5099 
5100 
5101 
5102 
5103 
5104 
5105 
5106 
5107 
$108 
$109 
$110 
$111 
$112 
$113 
$114 
$115 
5116 
5117 
5118 
$119 
5120 
$121 
5122 
$123 
5124 
5125 
5126 
$127 


025172 
075176 
025202 


075 206 
025210 
025216 
025224 
025226 
025234 


025240 
025244 


025246 
025252 
025254 


025256 
025264 
025266 
025274 


025276 
025304 
025306 
025314 


025316 
025324 


11-AUG-76 00:00 


016246 
042716 
122665 


001014 
016237 
032737 
001405 
052737 
000137 


005737 
100004 


004037 
001324 
000207 


032765 
001404 
052765 
000667 


032765 
001404 
052765 
000657 


052765 
000653 


000010 
177770 
000000 


040000 
026022 
001560 
050706 
010000 


000020 


020000 
000400 


000040 


001406 
001406 


001460 


000014 
000212 


000014 
000212 


000212 


MACY11 30€1046) O1-CEC-77 142315 PACE 110 


COMMAND TIME OUT ROUTINE 


«SBTTL COMPAWD TIME OUT FOUTING 
TIMOUT: MOV 


S$: 


10$: 


12$: 


15$: 


BIC 
CrPB 


BWE 
nov 
BIT 
BEQ 
BTS 
J¥P 


Tst 
BPL 


JSR 
crurro 
RTS 


BIT 
BEQ 
BIS 
BR 


BIT 
BEQ 
BYS 
BR 


BIS 
BR 


RECS2(R2),-(SP) sCET CS? FOR CRIVE RUMBER 
#°CCORUMSKD, (SP) SKEEP DRIVE BOPBFR 
(SP)¢,P.DRURCRS) sCHECK IF TIPE COT IF FGR 

3 CURRENTLY SELECTED ORIVE 
$$ 3"0, TEST IF LCOPING ON CONTROLLER ERROP 
RECSICR2),7.CS1 sCGET COMMAND ABD STATUS REGISTER 1 
#60,T.CS1 sCHECK YF GO IS STILL SET 
$$ sO, TEST IF LOOPING OW CONTROLLER ERROF 
SE.CNTO,E.CONT jSET CONTROLLER TIMED CUT OF COPPARD 


COMTRL 260 BEPCRT CCHTIFCLLER ERROK 
ERCONT sCHECK TF CYCLING OW CORTROLLER ERROR 
10$ xo, CHECK IF DRIVE IS CURREBTLY 
3 SEIZED BY CTREF PORT 
RO,Q.PUSH SREQUEUE COPRAND TH COMPARD 
3 I IRITTATION QUEUE 
Pc sRETURD 


———— sCHECK IF CRIVE WAS SEIZED 
12$ 200, CONTINUE 
#BIT4,P.ERPR( RS) ZSET TIME CUT BECAUSE DPIVE SEIZEC 


ABNOOO 3GO INITIATE ERRCR PROCESSING 
#E.UNLD,P.PRSTC(PS) CHECK IF WAITING FOR HEADS TC KELCAT 
15$ 30, SET TIME CUT FOR POSITIONING 
#PITG,P.ERR(RS) sSET TIPE CUT IN RELOADING HEADS 

ABNO00 9GO INITIATE ERPCR PROCESSING 
SBITS,P.ERRCRS) 3SET TIVE OUT DURING POSITICHINCG 

ABNOOO 260 INITIATE ERRCR PROCESSING 


Sec 01234 


Bi/ 





en a gE ER ag er, ee ge a 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC Ry 
DZR6PR.P11 


$128 
$129 
5130 
$131 
5132 
5133 
5134 
$135 
5136 
$137 
$138 
5139 
$140 
‘ $141 
5142 
5143 
7 5144 
5145 
5146 
J $147 
5148 
5149 
5150 
$151 
$152 
$153 
5154 
$155 
5156 
$157 
5158 
5159 
5160 
$161 
5162 
5163 
5164 
$165 
5166 
$167 
5168 
$169 
5170 
$171 
$172 
5173 
5174 
$175 
5176 
5177 


a SS oe 


025326 
025330 
025332 
025336 
025342 
025346 
025352 
025356 
025362 
025366 
025370 
025372 


025374 
025376 
025402 
025406 
075412 
025416 
025420 
025424 
025426 
025432 
025436 
025440 
025444 
025450 
025452 
025456 
025462 
025464 
025470 
025474 
0275476 
025502 
025506 
025510 
075514 
025520 
025522 
025526 
025532 
025534 
025540 
025544 
075546 


010346 
010146 
012703 
012701 
104401 
004737 
012701 
104401 
004737 
012601 
012603 
000207 


010346 
104401 
016546 
004737 
104401 
010503 
062703 
012346 
004737 
104401 
012346 
004737 
104401 
012346 
004737 
104401 
012346 
004737 
104401 
012346 
004737 
104401 
012346 
004737 
104401 
012346 
004737 
104401 
012346 
004737 
104401 
012603 
000207 


11-AUG-76 00:00 


001406 
001426 
063401 
025606 
001442 
063500 
025606 


063560 
000036 
052144 
063567 


000040 


052144 
057551 


052144 
063630 


052144 
057551 


052144 
063643 


052144 
057551 


052144 
063656 


052144 
057551 


052144 
001165 


WACY11 30(€1046) O1-DEC-77 14315 PAGE i111 
RINT RKOG OWIBUS REGISTERS 


eSBTTL PRINT REO6 UNTBUS RECISTERS 


R3,-(SP) 
R1,-(SP) 
17. csi, na 
#T.0S,R81 
7 ERR3I00 
PC, PRSTAT 
#T.08,R1 
gERRI01 
PC,PRSTAT 
(SP)e,R1 
(SP)¢,R3 
pc 


-S8TTL PRINT DRIVE STATUS 


PROSTT: NOV 


R3,-(SP) 


PC,PINOCT 
gE RR3I03 
RE,R3 
#P.£00,R3 
(R3 )o-( SP) 
PC, BINOCT 
BLANKS 
(R3)¢,-CSP) 
PC,PINOCT 

a ERRI04 
(R3)¢,-(SP) 
PC,BINOCT 
BLANKS 
(P3)*,-C(SP) 
PC,PINOCT 
7ERR305 
(R3)e,-(SP) 
PC, BINOCT 
PLANKS 
(P3)¢,-(SP) 
PC,BINOCT 

7 ERR306 
(R3)4,-CSP) 
PC,BINOCT 
BLANKS 
(83)*,-(SP) 
PC,BINOCT 
@SCRLF 

(SP )#,R3 

Pc 


sSTORE R3 OW STACK 

sSTORE R1 OW STACE 

SLCAD BECTBRING CP REGISTER STOPACE 
SLOAD ERD OF REGISTER STORAGE 
SPRIGT RECISTER BANES 

SPRIST PECISTER CONTENTS 
sLOAD END OF PEGISTER STORACE 
SPRIGT RECISTER HANES 

SPRINT RECISTER CONTENTS 
sRESTCRE ?) 

SRESTORE R3 

sPETURS 


sSTORE RI ON STACK 
SPRIAT RECISTER HANES 
SCONVERT DRIVE STITUS REG TO OCTAL 


sPRIBT READER 

SDETERMINE START CF PRIRT CUT 
dPRINT PESSAGE A 

SPRINT MESSAGE B 

SPRIAT PESSACE A 

SPRIGT PESSACE B 

SPRINT MESSAGE A 

sPRIAT PESSACE B 

2PRIBT MESSAGE A 


SPRINT PESSAGE B 


sRESTORE R3 
sPETURN 


CH 








RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


OZR6EPP.P11 


$178 
° 5179 
5180 
5181 
5182 
5163 
5164 
$185 
5186 
51867 
5168 
5189 
5190 
$191 
$192 
5193 
‘ 5194 
$195 
5196 
J 5197 
5198 
5199 
5200 
$201 
$202 


025550 
02555? 
025554 
025556 
025560 
025564 
025570 
025574 
025600 
025602 
025604 


025606 
025610 
025614 
025616 
025620 
025624 


025626 
025632 


11-AUG-76 00:00 


010346 
010146 
010503 
010501 
062703 
062701 
104401 
004737 
012601 
012603 
000207 


012346 
004737 
020103 
001403 
104401 
000770 


104401 
000207 


000016 
000036 
063401 
025606 


052144 


057551 


001165 


eSOTTL PRINT CONTROLLER STATUS 


PRISTT: 


- SBTTL 
PRSTATS: 


10$: 


PRINT REGISTER CONTENTS 


MoV 
JSR 
cup 
BEG 
TYPE 
BR 


TYPE 
RTS 


WACY11 30€1046) Oi-CEC-77 14215 PAGE 112 
PRINT CONTROLLER STATUS 


R3,-(SP) 
R1,-(SP) 
R5,R3 
R5,R1 
gP.CS1,R3 
#P.DS,R1 
7ERRI00 
PC, PRSTAT 
(SP )¢,R1 
(SP )o,R3 
pc 


(R3)4,-(SP) 
PC, BIROCT 
R1,83 

10$ 

BLANKS 
PRSTAT 


7S CRLF 
Pc 


sSTORE R3 OW STACK 

sSTORE R1 OW STACK 

sSTOKE PARAWETER BLOCK ADDRESS 
3 FOR IBDEX CACULATIONS 
sCALCULATE BECINATEC OF OUTPUT OCTAL 
sCALCULATE EBC CF CUTPUT CCTAL 
SPRINT PECISTER BAINES 

JPRIST REGISTER CONTENTS 
JPESTORE R1 

SRESTCKE R3 

sRETURS 


FSAVE REGISTER VALUE FOR TYPE OUT 
SCORVERT TO CCTAL 

sCHECK TF FIBISRED 

sYES, RETORN 

sTYPE 2 BLANKS 

dTYPE NEXT PECISTER 


STYPE <CRO<LF> 
sRETURS 


Se@ 0124 


D4 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


OZR6PB.P11 


$203 
5204 
5205 
5206 
5207 
5208 
5209 
5210 
$211 
$212 
$213 
$214 
$215 
$216 
5217 
5218 
$219 
$220 
$221 
$222 
$223 
5224 
$225 
$226 
$227 
522” 
$229 
5230 
$231 
$232 
5233 
5234 
5235 
5736 
5237 
5238 
5239 
92740 
5241 
5242 
$243 
5244 
5245 
5246 
5247 
5248 
$249 
5250 
$251 
$25? 
5253 
5254 
52755 


025634 
025636 
025640 
025642 
025644 
025650 
025654 
025656 
025660 
025662 
025666 


025670 
025672 
025674 
025676 
025700 
025704 
025706 
025710 
025712 
025720 
025724 


025730 


025732 
025736 
025742 
025744 


025746 
025750 
025754 
075760 
025762 
025764 
025766 
025770 
025772 
025776 
026002 
026004 


026006 
026010 
026012 
026014 
026016 
026020 


11-AUG-76 00:00 


010446 
010346 
010146 
010046 
013703 
013704 
006304 
010346 
060416 
016501 
005301 


010100 
006201 
006201 
006201 
042701 
020104 
103037 
060103 
016537 
005037 
042700 


001406 


006337 
006137 
005300 
001372 


011300 
013701 
043713 
040001 
050123 
021603 
001407 
011300 
013701 
043713 
040001 
050113 


005726 
012600 
012601 
012603 
012604 
000207 


001630 
001632 


000062 
001620 
177760 


001616 
001620 


001616 
001616 


001620 
001620 


001616 


@SBTTL ECC CORRECTION POUTINE 


ECCCOR: MOV 


5$% 


10$: 


mov 
nov 
MOV 
nov 
uor 
ASL 
nov 
adD 
nov 
DEC 


Mov 
ASE 
ASR 
ASR 
BIC 
CrP 
BHIS 
ADD 
MOV 
CLR 
BIC 


ASL 
ROL 
DEC 
BWE 


MoV 
MOV 
BIC 
BIC 
BIS 
cup 
BEQ 
MoV 
MoV 
BIC 
BIC 
BIS 


Tst 
MOV 
MOV 
MOV 
MOV 
RTS 


MACY11 30€1046) O1-DEC-77 14315 PaGe 113 
ECC CORRECTION ROUTINE 


R4,-(SP) 
R3,-(SP) 
R1,-( SP) 
RO, -( SP) 
RTYBA,R3 
RTYWC,R4 
R4 
R3,-(SP) 
R4, (SP) 
PeEPOS(RS),Pi 
R1 


R1,R3 


sSTORE R4 OR STACK 

sSTCRE R3 ON STACK 

sSTOKE Rl GH STACK 

sSTORE RO OR STACK 

SLOAD BECTHRIFG GF SECTOR ADDRESS 
sLGAC WORDS HEAD FRCH SECTCE 
SMARE IT BYTES 

sSTORE ADDRESS OF START OF SECTOE 
sCALCULATE ERD OF SECTOR 

sSAVE POSITICH TAPFCRHATICR 
SDECREMENT BIT COURT BY ORE TO CET 
3 BIT ADDRESS 


SDETERMIBE WCROS THAT APE BAD 

3 FOR DATA READ (SHIFT 3 BITS 
3 =RICGHT) 

SCLEAR BYTE INDICATOR 

SCHECK TF ERECKh BITRIN TRANSFFE 
30, RETURS 

SDETERMINE ADDRESS OF ERROR 


P.EPAT(RS),ECCPAT ;LOAD PATTERD 


ECCPAT¢2 
#177760,R0 


$$ 


ECCPAT 
ECCPAT¢2 
RO 

3$ 


(R3),R0 
ECCPAT,P1 
ECCPAT, (R3) 
RO,R1 
R1,(R3)¢ 
CSP),R3 

10$ 

(R3),R0 
ECCPAT#2,R1 
ECCPAT#2,(R3) 
RO,R1 
R1,(R3) 


(SP)¢ 
(SP )#,RO 
(SP)*,R1 
(SP)¢,R3 
(SP ),R4 
PC 


SDETERMINE BIT PCSITION FOR START GF ECC 
3 CORRECTION 

SCORRECTION STARTS CH 

3 WCRD BCURDAGY 


sSHTET PATTERN 1 PIT LEFT 


SDECREMENT COURT 
sCHECK IF IN PCSITION 


sCCREECT FIRST WCED WITH FXCLUSIVE 
3 OF BITS IH EPRCR 


sCHECK IF SECCAD WOPD IN TRANSFER 
3¥O, RETURN 

sCORRECT SECCHD BCRO WITH EXCLUSIVE 
3 OF BITS Th EFECK 


ZACIJUST STACK 
SRESTORE RO 
SRESTCRE R1 
SPESTORF 83 
SRESTORE R4 
sRETURD 


Ell 





RK611/RKOG PERFORMANCE EXERCISER MAINDEC DZRG6P-8 


DZR6EPR.P11 


5256 
$257 
5258 
$259 
5260 
5261 
$262 
5263 
5264 
$265 
5 266 
$267 
5268 
5269 
5270 
$271 
5272 
$273 
$274 
$275 
5276 
$277 
5278 
$279 
$280 
5261 
$262 
$26? 
5284 
52865 
5286 
5287 
5268 
5269 
5290 
$291 
5292 
5293 
5294 
5295 
5296 
5297 
5298 
5299 
5300 
$301 
5302 
5303 
5304 
5305 
5306 
5307 
5308 
5309 
$310 
$311 


026022 
026024 
026030 
026036 
026040 
026044 
026050 
026054 
026056 
026062 


026064 


026070 
026072 
026076 


026100 
026104 
0276106 
026112 


026114 
026120 
026122 
026126 


026130 


026134 
026136 
026142 


026144 
026150 
026152 
026156 


026160 
026164 


026166 
026172 


026174 


026200 
026202 
026206 


026210 
026214 
026216 


11-AUG-76 00:00 


010446 
004737 
032777 
001402 
104401 
013704 
032704 
001403 
104401 
000457 


032704 


001403 
104401 
000451 


032704 
001403 
104401 
000443 


032704 
001403 
104401 
000435 


032704 


001403 
104401 
000427 


032704 
001403 
104401 
000421 


032704 
001403 


104401 
000413 


032704 


0014023 
104401 
000405 


032704 
001414 
104401 


046536 
002000 


001160 
001460 
100000 
060023 
000001 
057601 


000002 
0576 46 


000010 
057675 


000020 


057730 


000100 
057774 


000400 


062602 


001000 


062642 


040000 
063127 


153102 


MACY11 30(€1046) O1-CEC-77 14315 PAGE 114 
CONTROLLER ERROR DETECTED BY RKOG ORIVER 


eSBTTL CONTROLLER ERROR DETECTED BY FROG DRIVER 


CONTRL: MOV 
JSR 
817 
BEQ 
TYPE 

1$3 nov 
BIT 
BEQ 
TYPE 
BP 


2$3 BIT 


BEG 
TYPE 
BR 


3$3 BIT 
BEQ 
TYPE 
BR 


4$3 BIT 
BEQ 
TYPE 
BR 


BEQ 
TYPF 
BR 


6$3 811 
BEQ 
TYPE 
BR 


783 BIT 
BEQ 


TYPE 
BP 


8$: BIT 


BEQ 
TYPE 
BR 


9$3 BIT 
BEQ 
TYPE 


R4,-(SP) 
PC, 1.STOR 
SU10,@SuF 
1$ 

7 SBELL 
E.CONT,R4 
gE .HDS,R4 


2$ 
7 ERROOG 
10$ 


#£.CCLR,R4 
3$ 

7ERROO1 
10$ 

GE. NOAT, RA 
4 


$ 
wERROO2 
10$ 


GE.UDAT,R4 
5 


$ 
7ERROO3 
10$ 


#E.CLAT,R4 
6$ 
wERROOG 
10$ 
@EILLD, 4 
7 


$ 
aERROOS. 
10$ 


#E.DLT,R4 
8$ 

aERR200 
10$ 
#E.CEPRR,R4 
9$ 

eERR201 
10$ 
@E.CNTO,4 
20$ 

a RR207 


sSTORE R4 OW STACK 

sCET CORTROLLER STATUS 

sCHECR Tf BELL CH ERROR 

380, CONTINUE 

dRING BELL 

SSTORE CONTROLLER IRDICATORS 
SCBECR ITF DUPLICATE DRIVE SELECT 
380, CHECK FOR OTRER ERRORS 
STYPE “WOLTIPLE DRIVE SELECT® 
sDISPLAY REGISTERS 


SCHECK IF “CLEAR CONTROLLER DID ACT 
3 CLEAR ERRCR® 

38C, CHPCK CTRER CONTROLLER ERRCES 
SDISPLAY REGISTERS 


sCHECE TF “HO ATTENTION IW RKASOCE® 
30, CHECK THE CTRER COMTROLLER ERRCRS 


sDISPLAY REGISTERS 


SCHECK IF “UREXPECTED DATA TYPE ERACR® 
3G, CHECK CTREP COMTRCLLER ERROKS 


SDISPLAY RECISTERS 

SCHECF IF “ATTENTION OID BOT RESET 
3 WITH DRIVE CLEAR™ 

380, CHECK CTHEP CONTROLLER ERECES 
SDISPLAY RECISTERS 


sCHECR TF “TLLECAL ORIVER CCHPAREC® 
30, CHECK IF DATA LATE WHEN UNLCADING READES 


sDISFLAY FECISTFES 

SCHECK TF @DATA LATE WHEN UBLOADIBG HEACER® 
30, CHECK TF “CORTROLLER ERROR UPILE CATER IAC 
3 514rus* 

sDISPLAY RECISTERS 

sCHECK TF “CONTROLLER EPROR DOURTAC 

3 ORTVE SERVICTAC® 

3¥O, CHECR TF CCBTRCLLER TIPE CUT 

sDISPLAY RECISTERS 


sCHECK TE CCATECLLEP TIPE CUT 


3NO, CHECK YF DRIVE DETECTED DRIVE BUS PARITY ERECK 


Fil 








$312 
$313 
5314 
$315 
5316 
$317 
$318 
$319 
5320 
$321 
$322 
$323 
5324 
$325 
5326 
$327 
5328 
$329 
5330 
$331 
$33? 
5333 
5334 
5335 
5336 
5337 
5338 
$339 
5340 
$341 
$342 
$347 
$344 
5345 
5346 
5347 
5348 
5349 
5750 
$351 
$352 
5353 
5354 
$355 


© 00 0 0 0 0 08 08 8 ew a! 
la 


leeee8 0 0 0 0 ee 


OZREPR.P11 


026222 
026226 
026232 
026236 
026242 
026244 


026246 
026252 
026254 


026256 
026260 
0 26 266 
026270 
026274 
026300 
026304 
026310 
026316 
026322 
026324 
026330 
026336 


026340 
026346 
026350 
026356 


026760 
026364 


026366 
026374 
026376 
026402 


026404 
026412 
026414 
026420 
026422 


11-Aa0G-76 


104401 
004737 
004737 
104401 
000000 
000776 


032704 
001001 
000000 


012604 
052765 
010346 
005037 
116503 
005062 
010362 
012762 
105762 
001775 
004737 
032737 
001413 


032737 
001004 
032737 
001412 


104401 
000716 


136337 
001403 
104401 
000707 


146337 
006303 
005063 
012603 
000137 


00:00 
001165 
043072 


025326 
057554 


000010 
001462 
000000 
000026 
000010 
000105 
000000 


046536 
100000 


137400 


130761 


062642 


001510 
057730 


001510 
001540 
024766 


000034 


001406 


001410 
001424 


001423 


001506 


REG611/RKO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-B 


MACY11 30(1046) “ae 14315 PACE 115 


CONTROLLER FRROR DETECTED BY RKO6 DRIVER 


10$: 


20$3 


30$: 


35$: 


40$: 


TVPE 
JSR 
JSR 
TYPE 
HALT 
BR 


BIT 
BFE 
HALT 


mov 
BIS 
mov 
CLR 
wOVB 
CLR 
mov 
“ov 
TSTB 
BEG 
JSR 
BIT 
BEQ 


7$CRLF sTYPE <CEh><LFD 
PC, PRITIN SPRINT TIVE 
PC, PRIREG SPRIGT CONTROLLER REGISTERS 
7ERRO00 sTYPE FATAL ERROR 

. SHANG Of FATAL ERSCR 
#€.DPAR,R4 sCHECK TF “ORTIVE DETECTED DRIVE BUS PARITY ERRCE* 
30$ 3YES, SET ORPAR IR ERROP RECISTES 
(SP)¢,R4 ZRESTICRE R4 
#DRPAR,P.ERCRS) ZSET DRIVE DETECTED DRIVE BUSSOTT> PARITY 
R3,-(SP) sSTORE R3 OW THE STACK 
O.WAIT sCLFAR WAITIAC PCR COMMAND COMPLETICH 
P.DRUNCRS),R3 sCET DRIVE RUPBER 
RKMR1(R2) SCLEAR PAINTERARCE REGISTER 1 


R3,RKCS2(R2) SLOAC DRIVE BURBER 
@CLEAR,PRCSI(R2) 3LOAD DRIVE CLEAR 


RKCS1( R82) SWAIT FOR READY 

35$ 

PC,1T.STCR sSTOKE REGISTERS 

#CERR,T.CS1 sCHECK IF CONTROLLER ERROR 

37$ 3NO, CHECK IF ATTENTION CLEARED 


CHECK FCR CONTROLLER TYPE ERECR 


BIT 
BNE 
BIT 
BEQ 


TYPE 
BP * 


BITB 
BEQ 
TYPE 
oR 


BICP 
ASL 
CLR 
woV 
J¥P 


SUFEIMDSIPCEINEMINEDIOPEIDLT,T.CS2 
36$ 
SILCIOTVECFPTE SDECHIPSFERURCICTEICPIIDCK,T.ER 


40$ 

@ERR201 STYPE CONTRCLLER ERRCR DURIPG DRIVE SERVICING 
10$ 360 655P067 ERECE 

INTMSKCR3),T.ASOPO1 ZCHECK TF ATTENTION CLEARED 

40$ dYES, REPORT ERRCE 

cERROO4 STYPE "DRIVE CLEAR CID WOT RESET PTTERTICE® 
10$ 3CO KEPORT ERROR 

IRTMSECR3),W.TIME ;CLEAR TIMING CURRENTLY CR THIS CRIVE 

R3 SPULTIPLY BY 2 

W.DRV(R3) SCLEAR WATCH DCC TIVE 

(SP)¢,R3 SRESTCKE F3 

ABNORM 260 10 ABROSMAL RETURN 


SEG 0127 


Gil 








5356 
5357 
5358 
$359 
5360 
5361 
$362 
$363 
5364 
5365 
5366 
5367 
5368 
5369 
$370 
$371 
5372 
$373 
$374 
5375 
5376 
$377 
5378 
$379 
5380 
5381 
53862 
5383 
5384 
5385 
5386 
5387 
5388 
$369 
5390 
$391 
5392 
5397 
5394 
5395 
5396 
5397 
5398 
5399 
5400 
$401 
5402 
5403 
5404 





026426 


026432 
026440 
026442 
026446 
026454 
026456 
026464 
026466 
026474 
026476 
026502 
026510 
026512 
026516 
026524 
026526 
026532 


026540 
026542 
026546 
026554 
026556 
026562 
026566 
026572 


026600 
026602 
026606 
026614 
026616 
026624 
026626 
026632 
026636 
026€40 
026646 
026654 
026660 
026666 
026672 
026674 
026700 
026702 


11-AUG-76 00:00 


004737 


032777 
001402 
104401 
032777 
001404 
032777 
001050 
032737 
001402 
104401 
032737 
001402 
104401 
032737 
001402 
104401 
032737 


001402 
104401 
032777 
001014 
004737 
004737 
004737 
032737 


001402 
004737 
032777 
001010 
032777 
001005 
104401 
104401 
000000 
012737 
012762 
005062 
112737 
004037 
026702 
004037 
001324 
000207 


051126 
002000 


001160 
020000 


040000 
000001 


060332 
000002 


660371 
000004 


060422 
000010 


060446 
020000 


043072 
025550 
027476 
000001 


027320 
100000 


057554 
060051 


100000 
100000 
000026 
000005 
046314 


050706 


152500 


152464 
152454 
001560 


001560 


001560 


001560 


152364 


001560 


152324 
152314 


001560 
000000 


001406 


RK611/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-8 
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MACY11 30(1046) O1-DEC-77 14318 PACE 116 
CONTRCLLEP ERROR DUE TO REICSTER INCONSTISTANCIES 


eSBTTL CONTROLLER ERROR DUE TO REIGCSTER THCONSTSTARCIES 


CHTRLI: JSR 


1$3 


2$3 


S$: 


7$3 


10$: 


1152 
1552 


2052 


BIT 
BEQ 
TYPE 
BIT 
BEG 
BIT 
BWE 
BIT 


PC,G.PNOV 
#Sul0,e@suer 
is 


@SBELL 
@S013,@SUR 
2 


#SU14,eSUR 
10$ 

@BI TO, EPCOT 
3 


$ 
gERPO13 
#8I1T1,ERCONT 
4s 
zERRO14 
e8IT2,ERCONT 


5$ 
gERRO1S 
#BIT3,ERCCHT 


7$ 

vERPO16 
#SW13,@0SUR 
10$ 

PC, PRITIN 
PC, PRISTT 
PC,PRIOO2 
@BITO,ERCCUT 


10$ 
PC,PRIO01 
#SW15,@SuR 


11$ 

#5014, SUP 
15$ 

a ERPOOO 
2ERROOT7 


#BIT1S,ERCONT 


@CCLR,ZRECS1(R2) 


REMRI(R2) 
#OR.CLR,T.CS1 
RO, T.1SSU 
RO, Q.PUSH 


PC 


SPEMOVE PARAMETER BLOCK FROP THE 

> COMMAND IMITIATION QUEUE 

sCHECK TF BELL CB ERROR 

30, CONTINUE 

sRING BELL 

SCHECK TF IWHIBTT PRINT OUT 

300 PRIGT ERRCH HESSACE 

sCHECK IF CYCLE OF OPERATION 

sYES, CHECK IF LOCP Of CPERATION 

sCHECK If “CONTRCLLER ERROR NOT FLACCED® 


SCHECK IF “WORD COURT HOT O* 


sCHECK IF *B8US ADDRESS IECORRECT® 


SCHECK TF “CYLIRCER, TRACK, SECTOR 
3 TecoRRECT® 


sCHECR IF INHIBIT PRINT OUT 

sYES, CHECK IF RALT OW ERROR 
sPRIBT TIVE 

SPRIET RROG GECISTERS 

sPRIBT CURRENT SUPPLIED COMPARD 
sCHECK® TF CONTROLLER ERROP 

3 OCT FLACCED 

3¥0, DO BOT PRINT PREVOUS COMPARE 
SPRINT PREVIGUS CCHPARD 
pCHECK TF HALT OB ERROR 

sYES, WALT 

sCHECK TF LCOP OPERATION 

sVES, CLEAR ERRCK 

SPRIST “FATAL EPROR® 

SPRIBT “SET SWITCH 14 TC CYCLE Ce ERRCE® 


SSET CONTROLLER EPROR PRESERT 
SCLEAR CORTRGLLER 

SCLEAP MAINTARENCE FECISTER 1 
3LOAC COMPARD INTC TEMPORARY CS1 
260 ISSUE DRIVE CLEAR 

ZERRCR RETUFA 

3PUT PARAMETER BLCCR ON COMP AND 
3 IBITIATION QUEVE 

SPETUPR 


SEG 0128 


A 








RERG611/RKOG6 PERFORMANCE EXERCISER MAINDEC DZR6P-B8 MACY11 30(€1046) 01-DEC-77 14315 PACE 117 








OZREPR.P11 11-AUG-76 00:00 PRINT WROLE DATA BUFFER SEG 0125 
5405 eSBTTL PRIGT WHOLE DATA RUFFER 
5406 
$407 026704 122765 000121 000123 PRIBUF: CHPB SRDDATA,P.RCHDC(RS) SCHECK IP READ DATA 
5408 026712 001017 BRE 5$ NG, RETURGE 
$409 026714 032765 000010 000150 817 @BIT3,P.DSTICRS) sCHECK IF TIPE TC PRIBT BUPFES 
$410 026722 001013 BRE 5$ 380, RETURE 
$411 026724 052765 000010 000150 BIS #8IT3,P.DSTTC(RS) sSET BUFFER ATTEMPTED TO BE PRIBTED 
$412 026732 032777 020000 152200 Bit #5013, 9SuR sCHECK Tf IRBIBIT PRINT OUT 
$413 026740 001004 BRE 5$ sYES, RETORN 
$414 026742 032777 000010 152170 BIT #SU3,0SUR SCHECK TF PPINT SECTOR BEFORE BECIENIAG 
5415 3 ERROR RECOVERY 
$416 076750 001001 BRE 10$ SYES, PRIBT SECTOR IB ERROR 
cans 026752 000207 55: ats pc sRETURe 
5419 026754 010146 10$: wov R1,-(SP) sSTORE R1 OW THE STACK 
5420 026756 010346 nov R3,-(SP) sSTORE R3 OR THE STACK 
5421 026760 010446 nov R4,-(SP) sSTOKE P4 GOH THE STACK 
$422 026762 104401 063312 TYPE 7ERR213 sTYPE ADDDRESS OF BEGINNING OF 
5423 3 SECTOR IB ERRCR 
5424 026766 013703 001630 nov RTYBA,R3 sGET ADDRESS CF START OF SCTOR 
5425 026772 013704 001632 nov RTYUC,R4 sGET WORD COURT 
5426 026776 010346 nov k3,-(SP) SSTORE STARTING ADDRESS FOR PRIBT CUT 
5427 027000 004737 052144 JSR PC, BIROCT sCORVERT OF GCTAL 
5426 027004 104401 063363 TYPE gERR214 sTYPE OATA PEAD 
5429 027010 012701 000010 15$3 nov #6.,R1 sSET 8 COLUMBS O8 PAGE 
5430 027014 104401 001165 TYPE @SCRLP sTYPE <CR><LF> 
5431 027020 012346 2052 nov (R3)*,-CSP) 2657 BEXT WORD OF SECTOR 
5432 027022 004737 052144 JSR PC, BIROCT sCONVERT TG CCTAL 
5433 027026 005304 DEC R4 sCHECK IF FIBISHET 
$434 027030 001405 BEQ 30$ SVES, RESTORE REGISTERS 
$435 027032 005301 DEC R1 sCHECK If END OF LIBE 
5436 027034 001765 BEG 15$ SYES, IBITIALTZE CCLUMN COURT 
5437 027036 104401 057551 TYPE BLANKS sTYPE 2 BLANKS 
oo 027042 000766 BR $ 2667 WERT WORD 
9 
5440 027044 104401 001165 2052 TYPE aS$CPRLe STYPE <CR><LED 
$441 027050 012604 mov (SP) ,R4 sRESTORE R4 
$442 027052 012603 nov (SP )e,8? SRESTORE R3 
$443 027054 012601 nov (SP)¢,R1 dRESTCRE ®1 
5444 027056 000207 RTS Pc sPETURN 
E 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30(1046) O1-CEC-77 14318 PAGE 116 


OZR6PB.P11 11-AUG-76 00:00 PRINT DRIVE AND PACK SERIAL NUMBERS SEQ 0146 
5445 eSBTTL PRINT DRIVE AND PACK SERIAL BUMBERS 
5446 
$447 027060 010146 PRISER: MOV R1,-(SP) sSTORE Pi OW STACF 
5448 027062 010346 Mov R3,-(SP) sSTORE R3 OW STACK 
5449 027064 010446 MOV R4,-(SP) dSTORE R4 OF STACK 
$450 027066 012701 055667 NOV #STT100,R1 3GET ADDRESS OF ASCII STRING 
$451 027072 016503 000224 MOV P.SERL(RS),R3 8 sCET DRIVE SERIAL NUMBER 
$45? 027076 006103 ROL R3 SSHIFT DRIVE SERIAL BUMBER 4 BITS LEFT 
5453 027100 006103 ROL R3 
5454 027102 006103 ROL R3 
5455 027104 006103 ROL R3 
$456 027106 012704 000003 nov #3,F4 SLOAC BOMPER CF CIGITS CF SERTAL BUPBER 
$457 027112 105011 25: CLRB (Ri) sCLEAP WEXT BYTE FOR PRIBT CUT 
$458 027114 006103 ROL R3 sSHIFT IN BEXT 4 PITS 
$459 027116 106111 ROLB (R11) 
$460 027120 006103 ROL R3 
$461 027122 106111 ROLB «R1) 
5462 027124 006103 ROL R3 
$463 027126 106111 ROLP «R1) 
5464 027130 006103 ROL R3 
$465 027132 106111 ROLB (Ri) 
5466 027134 152721 000060 BIse #60, (R1)¢ SCHABCE BCD 10 DECIMAL 
5467 027140 005304 DEC Ra sCHECK IF FINISHED 
5468 027142 001363 BWE 2¢ sCORVERT WEXT DIGIT 
5469 027144 104401 055644 TYPE @STTO00 STYPE “DRIVE SERIAL NUMBER 
5470 027150 016503 000226 nov P.PKSR(RS),P3 sGET LEAST SICHTFICANT BITS CF 
$471 3 PACK SERTAL BNUPBER 
5472 027154 016504 000230 MOV P.PKSPe2(R5),R4 sCET MOST SIGHIPICART BITS OF 
$473 3 PACK SERTAL RUPBER 
5474 027160 012701 056232 nov #STT012,R1 sGET ADDRESS CF ASCII STRIKC 
$475 027164 105011 CLRB (R1) sCLEAP FIRST BYTE OF PRINT CUT 
ps 027166 000404 BR 1$ SSTART COWVERSICN TO OCTAL 
5 
5478 027170 105011 5$3 CLRRB (Pi) sCLEAR WEXT BYTE CF PRIRT OUT 
5479 027172 006103 ROL R3 sSHIFT TH BEXT THREE BITS 
$480 027174 006104 ROL R4 
$481 027176 106111 ROLB cR1) 
$482 027200 006103 7$3 ROL R3 
$483 027202 006104 ROL R4 
5484 027204 106111 ROLP (Ri) 
$485 027206 006103 ROL R3 
5486 027210 006104 ROL Ra 
$487 027212 106111 ROLP (Ri) 
5488 027214 152721 000060 BISB #60, (R1)+ sMAFE IT ASCIT 
$489 027220 022701 056745 CwP #STT013,k1 SCHECK TF FIATSREO 
5490 027224 101361 BHI S$ 200, CCHTIBUE CCBRVERSIOR 
$491 027226 104401 056205 TYPE @STT011 STYPE PACK SEPIAL ROUMBER 
$492 027232 012604 MOV (SP )o,R4 ZRESTORE PR4 
$493 027234 012603 MOV (SP)*,R? sPESTORE R3 
5494 027236 012601 ucy (SP)#,R1 SRESTCRE Pl 
5495 027240 000207 RTS Pc ZRETURN 


oll 








RK611/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PB.P11 


5496 
5497 
5498 
5499 
5500 
5501 
$502 
5503 
$504 
5505 
5506 
5507 
5508 


027242 
027250 
027252 
027256 
027264 
027266 
027274 
027302 
027306 
027312 
027316 


11-AUG-76 00:00 


032777 
001402 
104401 
032777 
001014 
116537 
152737 
104401 
004737 
004737 
000207 


001160 
020000 


000000 
000060 
055427 
027060 
043072 


151670 


151654 


055446 
055446 


MACY11 30€1046) O1-CEC-77 14:15 PACE 119 


PRINT BEGINNING OF ERROR READER 


eS8TTL PRIFT BECTURING OF ERROR HEADER 


PRIOOO: BIT 


1$: BIT 


20$: RTS 


#5010, esuß sCHECK TF BELL CK EPROR 

1$ 380, CHECK TF INHIBIT PRINT OUT 
@ SBELL SRIWG BELL 

#SW13,@SuR sCHECK TF INHIBIT PRINT CUT 

20$ 3YES, INCREMERT CCHTROLLER ERROR 
P.DRUNCRS),OPROLL Z;STORE DRIVE RUPBER 

#60, 0PR011 aMARE IT ASCIT 

7 OPRO10 STYPE “DRIVE ROPBER Be 

PC, PRISER SPRINT DRIVE AND PACK SERTAL BUPBERS 
PC, PRITIN sPRIGT TIME 

Pc sRETORS 


ern 


SEG 0141 


Kil 














RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30€1046) O1-DEC-77 14315 PAGE 120 
: DZR6PB.P11 11-A0G-76 00:00 PRINT PREVIOUS COMMAND SEQ 0142 
: 5509 eSBTTL PRINT PREVIOUS COMMAND 
$510 . 
5511 027320 104401 062453 PRIOO1: TYPE ERPR101 STYPE “PREVICUS CrND CYL TRE SEC wRO CT® 
$512 027324 122765 000121 000135 cues GRDDATA,P.LCHDC(RS) SCHECK IPF READ DATA 
. 5513 027332 001402 BEQ 58 sVES, DO ROT PRIBT PATTERN RUY 
5514 027334 104401 062535 TYPE eERR102 sPRIST “PAT® 
S515 027340 104401 001165 552 TYPE @SCRLF sPRIBT <CR><LPD 
- 5516 027344 005046 cLtR (SP) sMAKE 800" OB STACK 
5517 027346 116516 000135 MOVB PeLCHDC(RS),(CSP) 9GET LAST CONPARD 
5518 027352 004737 052144 JSR PC, BIROCT sCCRUERT TO CCTAL 
¢ 5519 027356 104401 057551 TYPE BLANKS sTYPE 2 BLARKS 
5520 027362 016546 000136 nov P.LCYLCRS),-(SP) CET LAST CYLINDER USED 
$521 027366 004737 052144 JSR PC, BIROCT sCONVERT TO OCTAL 
$522 027372 104401 057551 TYPE BLANKS sTYPE 2 BLABES 
$523 027376 005046 CLR -(SP) SMAKE ROOH OB STACK 
5524 027400 116516 000141 Movs P.LTRE(RS),(SP) JCET LAST TRACK USED 
5525 027404 004737 052144 JSR PC,BIROCT JCORVERT TO OCTAL 
5526 027410 104401 057551 TYPE BLANKS sTYPE 2 BLARES 
5527 027414 005046 CLR -(SP) sMARE ROOM OH STACK 
5528 027416 116516 000140 MOVB P.LSEC(RS),(SP) 3CET LAST SECTOR USED 
5529 027422 004737 052144 JSR PC, BIROCT SCORVERT TO OCTAL 
5530 027426 104401 057551 TYPE „BLauS sTYPE 2 BLANKS 
5531 027432 016546 000142 nov P.LWC(R5S),-(SP) sSTORE LAST WORD COUNT 
$532 027436 004737 052144 JSR PC, BIROCT sCORVERT TO GCTAL 
$533 027442 122765 000121 000135 CMPB @RDDATA,P.LCHD(RS) sCRECK IF PAT @ VALIC 
5534 027450 001407 BEQ 10$ 380, 0O BOT TYPE 
5535 027452 104401 057551 TYPE BLANKS sTYPE 2 BLANKS 
$536 027456 005046 CUR -(SP) 3MAFE ROOW OB STACK 
5537 027460 116516 000144 nOvVB P.LDPT(RS),(SP) sGET LAST DATA PATTERR 
5538 027464 004737 052144 JSR PC,BIROCT sCORVERT TO OCTAL 
5539 027470 104401 001165 10$: TYPE @SCRLP aTYPE <CR><LF> 
5540 027474 000207 RTS Pc sPETURD 


OE —— 


— 





os > it 


REGLI/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-8 


DZR6PB.P11 


$541 
$542 
5543 
5546 
5545 
5546 
$547 
$54e 
5549 
5550 
$551 
5552 
5553 
5554 
$555 
5556 
5557 
5558 
$559 
5560 
5561 
556? 
5563 
5564 
$565 
5566 
5567 
5568 
5569 
5570 
$571 
5572 
5573 
5574 
$575 
5576 
5577 
5578 
5579 
5580 
5581 
$582 
5583 


077476 


027502 
027510 
027512 
027516 
027522 
027524 
027530 
027534 
027540 
027544 
027550 
027554 
027556 
027562 
027566 
027572 
027574 
027600 
027604 
027610 
027612 
027620 
027622 
027626 
027632 
027636 
027642 
027646 
027652 
027656 
027662 
027670 
027672 
027676 
027700 
027704 
027710 
027714 


11-AUG-76 00:00 


104401 


122765 
001402 
104401 
104401 
005046 
116516 
004737 
104401 
016546 
004737 
104401 
005046 
116516 
004737 
104401 
005046 
116516 
004737 
104401 
005046 
122765 
101002 
116516 
004737 
104401 
016546 
004737 
104401 
016546 
004737 
122765 
001407 
104401 
005046 
116516: 
004737 
104401 
000207 


06234? 


000121 


062535 
001165 


000001 
052144 
057551 
000002 
052144 
057551 


000005 
052144 
057551 


000004 
052144 
057551 


000021 


000006 
052144 
057551 
000010 
052144 
057551 
000012 
052144 
000121 


057551 
000121 


052144 
001165 


000123 


000147 


000123 


MACY11 30(1046) O1-DEC-77 14:15 PAGE 121 


PRINT CURRENT GENERATED CONMARD 
eSBTTL PPINT CURRENT GENERATED COMMAND 
PRIOO2: TYPE 


10$: 


15$% 


CMPB 
BEG 
TYPE 
TYPE 
CLR 
wOVB 
JSR 
TYPE 
nov 
JSR 
TYPE 
CLR 
MOVB 
JSR 
TYPE 
CLR 
nOVR 
JSR 
TYPE 


7ERR100 SPRINT “CURRENT SUPPLIED COPNARD® 
3 CYL TRE SEC CFFSET 
BUS AD WRU CT® 


3 
#RODATA,P.RCHDC(RS) SCHECK IF PAT @ TS T0 BE PRINTED 
5$ 


380, DC BCT PRINT HEADER 


@ERPR102 SPRINT “PAT® 

@SCRLF SPRIUT <CR><LFD 

-(SP) SMAKE ROGW OB STACK 
P.CHNDCRS),(SP) sSTOGE CCHHARET FCR PRINT OUT 
Pc, BINOCcT sCONVERT TO OCTAL 

7 BLAUKS sTYPE 2 BLARKS 
P.CYLA(RS),-(SP) 3STORE CYLIBDER 

PC, BINOCT sCONVERT TO CCTAL 
BLANKS sTYPE 2 BLARKS 

-(SP) SNAKE ROOW OB STACK 
P.TRCKC(RS),CSP) ZSTORE TRACK 

PC, BIROCT sCORVERT TO CCTAL 
BLANKS 3TYPE 2 BLANES 

-(SP) sPAFE ROOM OW STACK 

Pe SECT(RS),(SP) sSTORE SECTCR 

PC, BINOCT sCORVERT TO CCTAL 

o BLANKS 3TYPE 2 BLARKS 

-(SP) s¥AKE ROOW OW TRE STACK 


#21,P.RERD(RS) jCHECK IF OFFSET 
10$ gC, TMDICATE ZFEC CFFSET 
P.OFSTCRS),(SP) sSTCKE OFFSET FCR PRINT OUT 


PC,BINOCT sCONVERT TO OCTAL 

BLANKS sTYPE 2 BLANKS 

P-BALC(RS),-(SP) sSTCRE BUS ADDRESS 

PC, RIROCT sCOVERT TO OCTAL 

@ BLANKS sTYPE 2 BLABKS 

PoWCCRS),-(SP) ZSTORF WORD CCUNT 

PC, BINOCT sCOVERT TO OCTAL 
@RODATA,P.RCHD(RS) 3CHECK IF PAT # TS TO BE PRINTED 
15$ 3NO, RETURE 

aPLANFS 3TYPE 2 BLANKS 

-(SP) 3MAKE ROOM OW TPE STACK 
P.DPAT(RS),(SP) sSTOKE DATA PATTERN FOR PRINT OUT 
PC, RINOCT sCORVERT TO CCTAL 

aSCRLF STYPE <CRK><LE> 

ec sPETUR 


SEG 0143 


Mii 
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4 OzR6PP.P11 11-A0G-76 00:09 PRIWT ERROR MESSAGE AWD DPOP PRIVE fee 0144 q 


see eSBTTL PRINT ERRCK MFSSACE AND DPOP DRIVE 
¢ 
5566 PPA MA AAeaeneneareresaeaganarenaranenaraeaeneneaenaneneneneseneese 
5587 - 
5588 3° EXPFCTED PRINT CODES 
5589 3* — —r⸗ 
5590 27 
5591 a BIT 1 PPINT ORIVE STATUS 
5592 2* BIT 2 PRINT PREVIOUS POSITION 
5593 3* BIT 5S QUESTIONABLE ORIVE STATUS 
5594 ” BIT 6 CURRENT GENERATED COPPAND 
5595 3* 
5=965 33 &—X 
5597 
S598 077716 010446 PRI100: MOV R4,-(SP) sSTORE P4 OW STACF 
5599 027720 012004 MOV (RO)*,R4 SSTORE ADDRESS CF PRINT COLE 
5600 027722 005204 INC R4 SCALCULATE START CF MESSACE 
$601 027724 010437 027736 MOV R4,2$ sSTOKE ERROR MESSAGE ADDRESS 
5602 027730 004737 027242 JSR PC, PRIO00 SPRINT HEADER 
5603 027734 104401 TYPE STYPE EPECK PESSACE 
5604 027736 000000 25: -woPD 0 
5605 027740 104401 001165 TYPE oSCRLF TYPE <CR<LFD 
$606 027744 032777 070000 151166 BIT #Sw13,@SuF sCHECR VF IPHIBIT PRINTCUT 
5607 027752 001033 BNE 10$ sYES, KFTORE 
5608 027754 105765 000150 TSTB P.DSTT(RS) sCHECR TF FIRST EPROR 
5609 027760 100402 B¥I 3$ YES, GO PRIKT CCRHTRGLLER REGISTERS 
5610 077762 104401 062712 TYPE 7 ERR 202 TYPE ERROR DURIBC FRRECR RECOVERY 
5611 027766 004737 025550 3$3 JSR PC, PRISTT SPRIBT CCHTPCLLER REGISTERS 
$612 027772 132744 000002 BITR #BIT1,-(R4) sCHECK JF POINT CRIVE STATUS 
5613 027776 001407 BEQ 5$ 3¥O, CONTINOE 
$614 030000 132714 000040 BITP SPITS, (R4) JCHECK TF QUESTICRAPLE STATUS 
5615 030004 001402 BEQ 4$ NC, DC BCT FRINT MESSAGE 
5616 030006 104401 063073 TYPE 7 ERR206 SPRINT “QUESTICRABLE DRIVE STATUS® 
5617 030012 004737 025374 4$: JSR PC, PROSTT SPRINT DRIVE STATUS 
561" 0730016 132714 000100 58: BITR #PIT6,(P 4) sCHECK TF PRINT CURRENT GERERATEC CCMPARL 
$619 030022 001402 BEQ 6S "0, DO BOT PRINT CURRENT COMPARE 
5620 030024 004737 027476 JSR PC, PRIO02 SPRINT CURREAT GERERATET COPMAND 
5621 030030 132714 000004 8$: BITs #B1T2,(P4) sCHECK TF PRINT FREVIOUS COPMAKD 
5622 030034 001402 BEG 10$ 3WC, CHECK TF HALT CN ERROR 
5623 030036 004737 027320 JSR PC,PRIO01 sPRIMT PREVICUS CCHPAND 
$624 030042 004737 030472 10$: JSR PC, FLTO00 sTEST IF HALT OW ERROR 
5625 030046 005265 000206 IWC P.WER(RS) STBCREMENT CTHER ERROR COUAT 
5626 030052 004737 022316 JSR PC, PUFREL sRELEASE PUPFER 
J 5627 030056 004737 012716 JSR PC, DROP PROF DRIVE FROM TEST SEQUENCE 
5628 030062 004737 022016 JSR PC, CETSUF SCET WEW DRIVE, CCMPAND, ANT PUPFER 
5629 030066 005037 001562 CLR ERRPRO sCLEAR FRRCP CURRENTLY BETNG PRCCESSED 
( 5630 030072 012604 wav (SP)o,R4 RESTORE R4 
5631 030074 000200 RTS RO sPETURM 





Aim 
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4 OZR6PB.P11 


5632 
5633 
5634 
$635 
5636 
$637 
5638 
‘ 5639 
5640 
5641 
5642 
564? 
5644 
5645 
5646 
5647 
5648 
5649 
5650 
5651 
5652 
5653 
5654 
5655 
5656 
$657 
5658 
5659 
‘ 5660 
5661 
566? 
’ 5663 
5664 
5665 
5666 
5667 
5668 
¥ 5669 
5670 
5671 
5672 
5672 
5674 
5675 
5676 
5677 
4 5678 
5679 
5680 
J 5681 
5682 
56863 
7 5684 
5685 
5686 
‘ 5687 


030076 
030100 
030102 
030106 
030110 


030116 
030120 
030122 


030124 
030132 
030134 
030142 


030144 
030152 
030154 
030156 


030160 
030166 
030172 
030200 
030202 
030206 
030212 
030214 
030220 
030222 
030224 
030230 
030234 
030240 
030242 
030246 
030250 
030254 


11-AUG-76 00:00 


010446 
012004 
132724 
001416 
032765 


001402 
012604 
000700 


052765 
100015 
052765 
000411 


032765 
001402 
012604 
000200 


052765 
004737 
032777 
001115 
010437 
105765 
100402 
104401 
104401 
000000 
104401 
004737 
132744 
001407 
132714 
001402 
104401 
004737 


000001 
000002 


000002 
000001 


000004 


000004 
027242 
020000 


030222 
000150 


062712 
001165 
025550 
000002 
000040 


063073 
025374 


000150 


000150 
000150 


000150 


000150 
150740 


PRINT ERROR MESSACE sec 0145 
«SBTTL PRINT ERROR MESSACE 


3 FSAARAAAAARAAAAAAAAAAAAAARAAARAAAAAAHAAARAAHRAAAAAAAAAED saeaenaesaanes 


3* 
3* EXPECTED PRINT CODES 
® werner — — ere ee fm wm ew wee OO ee 
3° 
3* BIT 0 DATA TYPE ERROR = 1 
3* NON-DATA TYPE EPROR = 0 
3* BIT 1 PRINT ORIVE STATUS 
” BIT 2 PRINT PREVIOUS POSITION 
3* BIT 3 PRIWT SECTOR IM EPROR 
3* BIT 4 PRINT HEADER 
3* BIT 5 QUESTIONABLE DRIVE STATUS 
nm BIT 6 CURRENT GENERATED COMMAND 
* 
——— 
PRI200: MOV R4,-(SP) sSTOKE R4 OW STACK 
nov (RO)*,R4 sCET PRINT CODE EPRCR FLACS 
BITB #BITO,(P4)¢ sCHECK YF DATA TYPE ERRCR 
BEQ@ $$ 340, WON-DATA TYPE ERROR 
BIT SBIT1,P.DSTT(RS) sCHECK IF DATA TYPE ERPOR 
3 BEING PRCCESSET 
BEQ 18 30, PRINT PESSIGE 
MOV (SP )o,R4 SRESTORE R4 
RTS RO sPETORD 
1$3 BIS SBITL,P.OSTTCRS) 3SET OATA TRANSFER ERRCR CCCURREC 
BPL 10$ sCHECK IF START CF ERROR RECOVERY 
BIS — — —— 21ES, SET SERVICING DATA ERECK 
BP 10$ 260 REPORT ERRCR 
5$3 BIT #BIT2,P.DSTT(RS) sCRECK IPF ROR-DATA TYPE ERPOR CCCURRED 
BEG 6$ 3NC, REPORT ERSCE 
acy (SP )¢,R4 ZRESTORE R4 
RTS RO sRETURN 
6$: BIS @BIT2,P.DSTTCRS) 2SEI NCH-DATA ERECE CCCURRED 
10$: JSR PC, PRIOOO sTYPE ERROR HEADER 
BIT #SW13,@SuR sCHECK TF INHIBIT PRINT OUT 
BFE 30$ sYES, IWHIBIT PRIST OUT 
“OV R4,12$ sSTChE ERROR PESSAGCE 
TSTB P.DSTT(PS) sCHECK TF ERROR CURING PECCVERY 
BY 11$ 3NO, PRINT ERROR 
TYPE aERR202 SPRIKT “ERRCR DURING ERROR RECOVERY™ 
11$: TYPE SPRINT ERRCP PESSAGCE 
12$: e-WOPD 0 
TYPE 7 $SCPRLF sTYPE <CRO<LF> 
JSR PC,PRISTT SPRIAT CONTFCLLER REGISTERS 
BITB #BITi,-(R4) sCHECK YF POINT CRIVE STATUS 
BEQ 22$ 380, CORTINUE 
BITB #BITS,(P4) SCHECK TF QUESTICRABLE DRIVE STATUS 
BFG 20$ 3RC, DO MCT PRIWT MESSAGE 
TYPE 7 ERP206 STYPE “QUESTICNABLE DRIVE STATUS® 
20$3 JSR PC, PROSTT SPRINT DRIVE STATUS Bix 
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OZR6PB8.P11 


5668 
5689 
5690 
5691 
569? 
5693 
$694 
5695 
5696 
5697 
5698 
5699 
5700 
5701 
5702 
5703 
5704 
5705 
5706 
5707 
5708 
5709 
5710 
$711 
$712 
$713 
5714 
$715 
5716 
$717 
5718 
$719 
5720 
5721 
$722 
$723 
5724 
$725 
5726 


030260 
030264 
030266 
030272 
070276 
030300 
030304 
030310 
030312 
030320 
030322 
030326 
030332 
030336 
030342 
030346 
030352 
030356 
030362 
030364 
030370 
030374 
030400 
030404 
030410 
030414 
030420 
030424 
030430 
030434 
030440 
030442 
030446 
030452 
030454 


030462 
030466 
030470 


11-AUG-76 


132714 
001402 
004737 
132714 
001402 
004737 
132714 
001422 
032765 
001416 
104401 
016546 
004737 
104401 
016546 
004737 
104401 
132724 
001424 
104401 
013746 
004737 
104401 
013746 
004737 
104401 
013746 
004737 
104401 
132744 
001402 
004737 
132714 
001403 
042765 


004737 
012604 
000200 


00:00 
000100 


027476 
000004 


027320 
000001 


062141 
000062 
052144 
057551 
000060 
052144 
001165 
000020 


062554 
001642 
052144 
057551 
001644 
052144 
057551 
001646 
052144 
001165 
000010 


026704 
000001 


100200 
030472 


000150 


MACY11 30(€1046) Oi1-CEC-77 14:15 PACE 124 


PPINT ERROR MESSACE 


22S: 


23$: 


2552 


2752 


2052 


4052 


45$3 


BITe 
BEG 
JSR 
BITR 


SB 1T6,(R4) sCHECR TF PRIBT CURRENT COMPARD 

23$ 30, CCRTINVUE 

PC, PRIO02 SPRINT CURREBTLY ISSUED COMPARD 

GRIT2,(R4) sCHECK TP PRIBT PREVIOUS COPNAND 

25$ 00, CHECK If PRIFT HEADER 

PC, PRIOO01 sPRIAT PREVICUS CCHPAND 

#BITO,(R4) SCHECK JP DATA TYPE ERROR 

27$ 380, DO HOT PRINT ECC 

#0CK,P.ER(RS) SCHEC® TF DATA CHECR 

27$ 3¥C, DO BOT PRINT ECC 

gERPRO67 sTYPE ECC PAT, ECC POS 

P.EPAT(RS),-(SP) 3CET PATTERN 

PC, BIROCT sCONVERT TO GCTAL 

Planks 

P.EPOS(PS),-(SP) 3GET POSITICH 

PC,BIROCT sCONVERT TO OCTAL 

a SCRLF 

SBIT4,CR4)¢ sCHECE TF PRINT HEADER 

30$ 380, CHECK If HALT OW ERROR 

sERRII1 STYPE HEADER DESCRIPTOR 

HEAD1,-( SP) gSTORE FIRST WORD OF THE HEADER 

PC,BIROCT sCCHUERT TG CCTAL 

BLANKS sTYPE 2 BLANKS 

HEAD2,-(SP) SSTORE SECOND WORD OF TRE HEADER 

PC, BIROCT sCORVERT TO GCTAL 

„BLauts sTYPE 2 BSLARKS 

HEAD3,-(SP) 3STOGE THIRD WORD OF THE REPDER 

PC, BINOCT sCONVERT TO OCTAL 

7 SCRLF STYPE <CR><LF> 

#PIT3,-( 84) sCHECE TF PRINT BECLE SECTCR 

40$ 3¥O, CHECK IF HALT OW ERROR 

PC, PRIBUF 3CO PRIWT BUFFER 

#BITO,(R4) sCHECK TF DATA TYPE ERROR 

45$ 3G, CHECR ITF HALT CW ERROR 

#BITISIBIT7,P.DSTT(PS) sCLEAR FIRST ERRCR AND ERECEH 
3 ERQUEUED 

PC, ALTO00 sCHECK TF HALT OB ERROR 

(SP)o,R4 SPESTCRE P4 

RO sPETURD 


SEG 0146 


C/& 
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$727 
5728 
$729 
5730 
$731 
5732 
5733 
5734 
5735 
5736 
5737 


030472 
030500 
030502 


030506 
030510 
030514 
030516 
030520 


11-AUG-76 00:00 


032777 
001407 
005737 


001403 
105762 
001775 
000000 
000207 


100000 150440 
001462 


@SB8TTL HALT OW ERROR CHECK 


HLT000: BIT 
BEQ 
Tst 
BEQ 
1$: TSTB 
BEQ 
S$: HALT 
10$: RTS 


MACY11 30€1046) O1-CEC-77 14315 PACE 125 
HALT OW ERROR CHECK 


#S015,@SUR 
10$ 
O.WAIT 


58 
RFCS1(R2) 
1s 


Pc 


sCHECK If HALT OW ERROR 

3¥O, RETURS 

SCHECK TF WAITING FOR CCHPARD 
3 CCMPLETICS 

3"O, RALT 

sWAIT FOR READY 


sPETURN 


SEG 0147 


Dia 











RF611/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-8 
11-AUG-76 00:00 


DZR6PB.P11 


5738 
5739 
5740 
5741 
5742 
5743 
5744 
5745 
5746 
5747 
5748 
5749 
5750 
$751 
5752 
5753 
5754 
5755 
5756 
$757 
5758 
$759 
5760 
5761 
5762 
5763 
5764 
5765 
5766 
5767 
5768 
5769 
$770 
$771 
5772 
5773 
5774 
$775 
5776 
$777 
$778 
$779 
5780 
5781 
5782 
5783 
5784 
5785 


030522 
030526 
030530 
030536 
030542 
030550 
030552 


030554 
070560 
030562 
030566 


030570 
030574 
030576 
030602 
030610 
030614 
030620 
030624 
030626 
030634 
030636 
030642 
030646 
030652 
030656 
030662 
030664 


030666 
030672 
030674 
030700 
030706 
030710 
030712 


030714 
030720 
030722 


105765 
100057 
042765 
005265 
022765 
103426 
000445 


105765 
10004? 
005265 
000405 


105765 
100034 
005265 
042765 
016546 
066516 
026526 
103020 
032777 
001014 
104401 
004737 
004737 
004737 
005037 
011000 
000200 


105765 
001010 
105765 
122765 
103402 
005720 
000200 


004737 
011000 
000200 


000150 


100200 
000206 
000020 


000150 
000202 


000150 


000704 
100200 
000204 
000202 
000104 


040020 
063040 
022316 
012716 


022016 
001562 


000120 


0001 46 
000010 


030724 


000150 
000206 


000150 


150304 


000146 


OTHER ERROR STATISTICS CATHERTUC 
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@SBTTL OTHER EPROR STATISTICS CATHERTEC 


WERSTT: TSTB 
BPL 
BIC 
Inc 
cup 
BLO 
BR 


» SBTTL 

SKISTT: TSTP 
BPL 
Inc 
BP 

e SBTTL 

OPISTT: TSTB 
BPL 


rnc 


STT1$: BIC 


STT2$: 


STTS$: 


552 JSR 


P.DSTTC(RS) 
STTS$ 


sCHECK Tf FIRST ERROR 
gRC, CCRTIAVUE ERSCKR RECCVESY 


SBITISIBIT7,P.OSTTCRS) sRESET FIRST ERROR AND ERECKHR ENQUEVEL 


P.HERCRS) 


SIBCREMERT OTHER ERRORS COURT 


@T.WER,P.WERCHS) sCHECK If ERSCR THRESHCLD EXCEECED 
$ 


STT2 
STTS$ 


P.DSTTCPRS ) 
STTS$ 
P.MSKICRS) 
STT1$ 


P.DSTT(PS) 
STTS$ 
P.NCPIC(RS) 


sYES, CHECK If DROP DRIVE 
380, START ERACR RECOVERY SEQUENCE 


SEK INCOMPLETE STATISTICS CATHERTEC 


sCHECK IF FIRST ERROR 

380, CONTINUE ERRCR RECCVERY 
STUCKHEMERT ROPBER CP SEFK IRCCHPLETES 
260 CHECK IPF ERRCR THRESHOLD EXCEEDED 


OPERATION INCOMPLETE STATISTICS GATHERING 


sCHECK TP FIRST ERROR 
30, CONTINUE ERRCR PROCESSING 
JIBCKENERT RUPBER CP OPERATION ISCOPPLETES 


GBITISCBIT7I,P.OSTTCRS) sRESET FIBST ERRCH ABD ERECH ENQUEVEC 
P.NOPTC(CRS),-CSP) SSTORE BOMBER OF CPERATION INCOMFLETES 
P.NSKICRS),CSP) ADD SEEK INCOMPLETES 

PoSRET(RS),(SP)* sCHECK IF FRECR THRESHCLO EXCEELEC 


stTs$ 
OSU41SW14,@SUR 
51155 

7 ERR205 

PC, RUPREL 

PC, DROP 

PC, GCETBUF 
ERRPRO 

CRO),RO 

RO 


pet 


$ 
P.RECT(RS) 
#8.,P.RFCTCRS) 


PC, UNRECY 
CRO),RO 
RO 


380, START ERROR RECOVERY 

SCHECK If IPHIBTT ORIVE DESELECTICH 

dYES, START RECCVERY SEGUENCE 

SPETBT PERRCR TARESHOLD EXCEEDED® 

SRELEASE BUFFER 

s0ROP DRIVE 

sGET WEW CCPPAND, DRIVE, ANC PUPEFE 

sCLEAR ERPOP CURRENT BETNC PROCESSED 
STUDICATE BO RECCVERY SFQUERCE ITB PROGRESS 
sRETURD 


SCHECK TF INHIBIT ERROR RECCVERY 

sYES, INDICATE UNRECOVERABLE PETURD 
STUCREMEST RETRY COONT 

sCHECK If RETRY FIRISHED 

sYES, CLEAN UP AFTEP UNSUCCESSFUL RETFY 
SINDICATE RECOVERY SEQUENCE IW PACGRESS 
sRETURD 


SCLEAN UP FOR UNSUCCESSFUL RECOVEFY 
STMDICATE WC PECCWERY SEQUENCE IB PROCRFSS 
sRETUPRA 


SEG 0146 


E/a 








5786 
5787 
5788 
5789 
5790 
5791 
5792 
5793 
| 5794 
5795 
5796 
5797 
5798 
5799 
5800 
5801 
5802 
5803 
5804 
5205 
5806 
5807 
5808 
5800 
5810 
5811 
512 
5813 
5814 
7 sais 
5916 
| 5817 
5818 
5819 
5220 
5821 
5822 
5823 
5824 
5825 
5926 
5827 
5828 
5829 
5230 
5831 
5832 
5933 
5834 
5835 
5836 
5837 
5838 
5839 
5940 
5841 


—— 


1@0©@ ee 0 0 0 e 


OZR6PB.P11 


030724 
030730 
030734 
030742 
030744 
030750 
030756 
030760 
030766 
030770 
030774 


030776 
031002 
031004 
031012 
031014 


031022 
031024 
031030 
031034 
031040 
031044 


031046 
031052 
031054 
031062 
031064 
031070 
031072 
031076 
031104 
031106 
031112 
031114 
031120 
031124 


031126 
031134 
031136 
031140 
031144 
031152 
031154 
031162 
031166 
031172 
031176 
031204 
031210 
031212 


11-AUG-76 00:00 


105037 
004737 
032765 
001415 
005265 
026565 
103007 
032777 
001003 
104401 
000413 


105765 
001421 
132765 
001404 
132765 


001441 
104401 
004737 
004737 
005037 
000207 


105765 
001006 
032777 
001002 
104401 
010446 
116504 
156437 
012604 
004037 
001314 
004737 
005037 
000207 


122765 
101733 
010446 
116504 
156437 
012604 
152765 
005065 
005065 
005065 
112765 
004037 
001324 
004737 


001640 
022316 
000001 


000200 
000102 


040020 
063040 


000210 
000010 
000200 
063003 
012716 
022016 
001562 
000120 
020000 
063003 


000000 
001510 


050706 


022016 
001562 


000010 


000000 
001510 


000200 
000146 
000150 
000212 
000113 
050706 


022016 


000150 


000200 
150152 


000710 
000210 


150056 


001507 


000126 


001507 
000210 


000001 
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MACY11 30(€1046) 01-DEC-77 14315 PACE 127 


URSUCESSFUL RECOVERY CLEANUP 


eSBTTL UNSUCESSFUL RECOVERY CLEARUP 


UNRECY: CLRB RTYSCHR 


1$: 


5$3 


10$: 


sCLEAR RETRY SECTCR COUNT 


JSR PC, BUF REL SRELEASE BUFFER 

BIT SB1TO,P.DSTT(RS) sCRECK IF DATA HARD ERROR 

BEQ i$ 3"0, CHECK IF DRIVE IS BETNC ASSICKED 
Ivc P.HARD(RS) STRCKENF HT HARD ERRCR CCURT 

cre P.UERTCRS),P.RARDC(RS) ZCHECK IF HAKD ERROR THRESHOLD EXCEELCEL 
BRIS 1$ 30, CHECK ITF DRIVE IS BEIBC ASSICBED 
BIT @Su41Sw14,@SuUh ZIBHIBIT ORIVE DESELECTICS 

BWE 1$ sYES, CHECK IP DRIVE IS BEING ASSIGNED 
TYPE a ERR205 SPRIGT “ERROR THRESROLD EXCEEDED 

BR 2$ 260 CROP DRIVE 

TSTB P.ASSH(PS) sCHECK TF DRIVE IS BEING ASSICHEE 

BEQ 5$ 380, CLEAN UF ERROR 

BITB a SCHECK IF PEAD PACK SERIAL BUNBER 

BEQ 2s 3RC, DROP OPIVE 


BITB OBIT7,P.ASSHCPS) SCHECK IP PECAL FOR READ OF 
3 PACK SERTAL RUPBER 


BEQ 10$ 30, ISSUE RECALIBRATE ABD TRY ACSI 

TYPE @ERR204 STYPE “ERRCR FECCVERY UBSUCCESSFUL® 

JSR PC, DROP sDROP DRIVE FROW TEST SEQUERCE 

JSR PC, CETBUF sCET WEW DRIVE, CCHPAND, ABD BUFFER 

CLE ERRPRO sCLFAR EERCR CURGERT PETHG PRCCFSSED 

RTS Pc sRETURA 

TSTB P.TERC(RS) aCHEC® TF IWHIBIT RETRY 

BRE 6$ sYES, OC BCT PRIBT PESSACE 

BIT @SU13,e@SuP sCHECK TF INHIBIT PRINT OUT 

BWE 6$ sVES, CONTIRUE 

TYPE zERR204 STYPE “ERROR RECCVERY URSUCCESSFUL® 
- mov R4,-( SP) sSTOKBE R4 ON STACK 


Movs P.DRYNCRS),R4 2667 DRIVE WUPBER 
BISB INTPSE(R4),O.CVER ;TADICATE IPPLIED SFEKS ARE ALLCHED 


wov (SP)o,R4 sPESTORE R4 

JSR RO,Q.PUSH sPUT PARAMETER BLCCR IN DPIVE 

AVATLQ > AVAILIABLE QUEUE 

JSR PC, CETBUF SCET WEW DRIVE, CCHPARD, AND PUPFES 

CLR EPRPRO SCLEAR ERROP CURRENT BEING PROCESSEC 

RTS pc sPETURD 

c¥PP #6.,P.RSEC(RS)  ZCHECK TF ALL 16-PIT MODE SECTORS HAVE PEFR TRIFC 
BLOS 2s sYES, DROP DRIVE 

MOV R4,-(SP) SSTORE PR4 OF STACK 


wove P.DPYNCRS),R4 sGET ORIVE WUPBER FCR INDEX 
BISB INTMSK(P4),0-CVER ;IADICATE THAT IMPLIED SEEKS PRE PLLOWEL 


MoV (SP )#,R4 SRESTORE PR4 

BISB8 SBIT7,P.ASSHC PS) ZINCICATE THAT GECALIBPATE HAS BEEN ISSUEC 
CLR P.RECTC(PS) sCLEAP ERROR FLAGS 

CLR P.DSTTC(RS) 

CLR P.EPR(RS) 

wove @PRECAL,P.CMNDCRS) ;LCAD FECALIBRATE COMMAND 

JSR RO,Q.PUSH sPUT PAPAWETER BLCCE IN COPPAND 

CInite 3 INITIATION QUEVE 

JSR PC, CETBUF 3GO ALLOCATE WEWCFY BUFFER 


SEC 0149 q 


Fin 
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MACYI1 30€1046) O1-DEC-77 14215 PACE 126 


OZR6PP.P11 11-AUG-76 00:00 UNSUCESSFUL RECOVERY CLEANUP 


5842 031216 005037 001562 
S843 031222 000207 


ctr 
RTS 


ERRPRCO sCLEAP FRRCR PROCESSING IN PROGRESS 
Pc sRETURS 











 @ © «@ « a! 


RK611/RKO6 PERFORMANCE EXERCISER PATNDEC DZR6P-B 
OZR6P2.P11 11-AUG-76 00:00 


$944 
$845 
5846 
5847 
594A” 
5849 
$850 
$851 
$852 
5853 
5854 
5*#55 
5856 
$857 
$858 
54859 
5860 
5861 
5862 
$86? 
5864 
5865 
566 
5867 
5868 
5°69 
5°70 
5871 
5872 
$877 
5874 
5875 
5876 
$877 
$878 
$879 
$9860 
5881 
5882 
5883 
$884 
5885 
5886 
587 
5888 
$889 
5890 
$891 
5992 
5893 
5894 
595 
5896 
5897 
5498 
5899 


031224 
031232 
031234 
031242 
031244 
031250 
031256 
031260 
031266 
031274 
031300 
031304 
031310 
031314 
031320 
031324 
031330 
071334 


031336 
031344 
031346 
031352 
031356 
031364 
031366 
031372 
031376 
031402 
031406 
031412 
071416 
03142? 


031424 
031432 
031434 
031440 
03144? 


031444 
031452 
031454 
031462 
031470 
031476 
031504 
031510 
031516 
031522 
031524 


031526 
031534 


032765 
001441 
032777 
001402 
104401 
032777 
001020 
116537 
152737 
104401 
004737 
104401 
004737 
004737 
004737 
005065 
005037 
000207 


032765 
001427 
004737 
104401 
032777 
001002 
004737 
005265 
004737 
004737 
004737 
004737 
005037 
000207 


032765 
001404 
004037 
062277 
000207 


032765 
001425 
042765 
052765 
116537 
042765 
004737 
112765 
004037 
001324 
000207 


032765 
001404 


000200 
002000 


001160 
020000 


000000 
000060 
055427 
043072 
060704 
025550 
025274 
030472 
000212 
001562 


000020 


027242 
061744 
020000 


027476 
000206 
030472 
022316 
012716 
022016 
001562 


000400 
027716 


000040 


100000 
000100 
000001 
000002 
036150 
000141 
050706 


000100 


000212 
147676 


147662 


055446 
055446 


000212 


147554 


000212 


000212 
000150 
000150 
001662 
000014 


000001 


000212 
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ERROR KECOVERY SEQUENCE 


eSBTTL ERROR RECOVERY SEQUENCE 
@BIT7,P.ERRCRS) sCHFCK TE URSCLICITATED INTERRUPT 


EPCVY: 


2$: 


3$% 


4S: 


5$: 


6$3 


7$3 


BIT 
BEG 
BIT 
BEQ 
TYPE 
BIT 
BRE 
HOVR 
BISe 
TYPE 
JSR 
TYPE 
JSR 
JSR 
JSR 
CLR 
CUR 
RTS 


BIT 
BEQ 
JSR 
TYPE 
BIT 
BRE 
JSR 
Inc 
JSR 
JSk 
JSR 
JS 
CLR 
RTS 


BIT 
BEQ 
JSR 
ERRO74 
RTS 


BIT 
BEQ 
BIC 
BIS 
MOVR 
BIC 
JSK 
“Ove 
JSR 
crurro 
RTS 


BIT 
BEG 


3$ 3UC, CHECK If ERECR INFORMATION STILL VALIC 
#SW10,@SuR SCHECK IF BELL CH ERKOR 

1$ 200, COWTINUE PROCESSING 

7 SBELL SPRING BELL 

#SW13,@SUR sCHECK TF INHIBIT PRINT OUT 

2$ sVES, CHECK IF HALT OF ERROR 


P.DORVNCRS),OPRO11 sLCAD ORIVE BUMPER FCR PEIAT CUT 


#60,0PR011 sMARE IT ASCII 

7 OPRO10 sTYPE “DRIVE ve 

PC, PRITIM sPRIBT TIME 

7 ERRO26 arYPE “IT PCRH CRY NOT UNDER TEST" 
PC,PRISTT SPRINT CONTROLLER REGISTERS 

PC, PROSTT SPRIGT ORIVE STATUS 

PC, HLTOO0 sCHECK IP HALT Ch ERRCR 

P.ERR(RS) sCLEAR ERPOP FLAGS 

ERRPRO SCLEAR ERROR BETNC PROCESSED 

PC sRETURE 


SBIT4,P.ERR(RS) ZCHECK TF SERVICING DRIVE SEIZED TIPE OUT 
5$ 


3"0O, CONTINUE 


PC, PRIOOO SPRIGT HEADES 

7 ERPROS9 SPRINT “TINE CUT BECAUSE DRIVE SEIZED" 
#S¥13,@SuR sCHECK IF INHIBIT PRINT OUT 

4$ sVES, DO BCT PRIBT CURRENT CERERATED COPPAAC 
PC, PRIO02 SPRIAT CORRFAT GERERATED CCPMAEC 

P.WERCRS) STUCKEMENT OTHER ERRORS 

PC, HLTO00 sCHECK IP HALT CR ERROR 

PC, PUFREL SRELEASE RUPEES 

Pc, DROP sDROP DPIVE 

PC, CETBUF sCET WEW DRIVE, CCMPAND, AMD RUFFER 

ERRPRO sCLEAR ERROP PETBC PROCESSED 

ec sPRETURD 

#SITS,P.ERR(RS) ZCHECK ITF TIME OUT RECAUSE HEADS CID NOT FELCAC 
6$ 3¥0, CONTINUE 

RO, PRI1006 sPRINT TIVE CUT BECAUSE HEADS DIC MCT RELCIC 
Pc sPETURN 


@BITS,P.EPRCRS) ZCHECK TF TIME OUT CURING DRIVE ECSITIORIBG 


7$ 


200, CONTINUE 


SBITIS,P.OSTTCRS) ZPESET ERFCR FAQUEUFD 
SBIT6,P.DSTTCRS) ZSET READ STATUS ISSUED 
P.C¥NDC(RS),POSCYD sSTORE COPMARD TW ERKCR 
SORVPOS,P-PRSTCRS) ZHESET DPIVE FCSTITIOBING 


PC, GETCUR 


SSTCKE PRESEAT STATUS FCK PRINT CCT 


@RDSTAT,P.CMNDC(RS) 3CET CRIVE STATUS 


RO,C.PUSH ZENQUEVE COMMAND TH COMMAND 
3 IBITIATION QUEVE 
Pc ;PETURN 


@BIT6,P.-ERR(RS5S) ZCHECR TF ERKCK BRILE ENQUEVED 


8$ 


200, CONTINUE 


Sec Cif) 


H/2 
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DZREPB.P1I1 11-AUG-76 00:00 ERROR RECOVERY 
5900 031536 004037 027716 JSE 
$901 031542 060564 ERRC22 
5902 
$903 031544 000207 RTS 
5904 
5905 031546 032765 004000 000016 8$: BIT 
$906 031554 001404 BEQ 
$907 031556 004037 036524 JSR 
5908 031562 060476 ERROL7 
$909 031564 000207 RTS 
$910 
5911 031566 032765 002000 000020 9$: BIT 
5912 031574 001404 BEG 
5913 031576 004037 036524 JSR 
5914 031602 060532 ERRO20 
5915 031604 000207 RTS 
5916 
5917 031606 032765 000001 000034 10S: BIT 
5918 031614 001404 BEQ 
5919 031616 004037 036524 JSR 
5920 031622 060545 EPRO21 
$921 031624 090207 RTS 
$922 
$923 031626 032765 010000 000020 11$: BIT 
5924 031634 00i%04 BEG 
5925 031636 004037 027716 JSR 
5926 031642 060631 ERRO23 
$927 031644 000207 RTS 
$928 
5929 031646 032765 000400 000020 15S: BIT 
5930 031654 001404 BEQ 
5931 031656 004037 027716 JSR 
5932 031662 060664 ERRO2S 
$933 031664 000207 RTS 
5934 
5935 031666 032765 020000 000016 185: BIT 
5936 031674 001004 BNE 
5937 031676 032765 000010 000034 BIT 
5938 031704 001437 BEQ 
5939 031706 004037 030076 19$3 JSE 
5940 031712 060650 ERRO24 
5941 031714 004037 030522 JSR 
5942 031720 032166 60$ 
5943 031722 032765 020000 000016 BIT 
5944 031730 001021 BWE 
$945 031732 032765 003400 000150 BIT 
$946 031740 001015 BNE 
5947 031742 132765 000007 000210 BITB 
5948 
5949 031750 001011 BWE 
5950 031752 042765 030000 000150 BIC 
$951 031760 052765 004000 000150 BIS 
5952 031766 112765 000113 000001 MOVB 
5953 031774 004037 050706 22$: JSR 
5954 032000 001324 crurro 
$955 032002 000207 RTS 
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SEQUENCE 
RO, PRT100 sPRIBT READES 

STYPE “ERROP WHILE WAITING 10 
3 §60>REPORT ERROR® 
ec sPETURD 


@CTO,P.CSIC(RS) sCHECK IF CONTROLLER TIME OUT 
9$ 380, CONTINUE 


RO, CORERR 3CO GEPORT ERRCR 
Pc sRETURD 
@PGE,P.CS2(RS) j CHECK IF PROCRAMPIEG ERROR 
10$ 3UC, CORTINUE 
RO, CONEPRR SPRINT READER 
sTYPE @PROG ERROR” 
Pc sRETURD 
SILC, P.ERCRS) sCHECK IF ILLEGAL FUNCTION CODE 


11$ 3¥O, CONTINUE 


RO, COWEPR sPRIGT READER 

sTYPE "TLLECAL FURCTICN COCE® 
Pc sRETORD 
@RED,P.CS7(RS) CHECK POR NOR-EXISTENT DRIVE 
15$ 380, CONTIBUE 
RO, PRI100 SPRINT READER 

STYPE °WOW-EXISTERT DRIVE" 
Pc SRETURE 
SUFE,P.CS2(R5) j;CHECK If URIT PIELD ERROR 
18$ 3G, CORTINUE 
RO, PRI100 SPRIBT HEADER 


sTYPE “UNIT FIELD ERROR® 
Pc sRETUPS 


@SPAR,P.CSI1(R5) ZsCHECK TF CONTROLLER DETECTED BAD PARITY 
19$ SVYES, PRIWT BESSACE 
#DRPAR,P.ER(RS) ;CHECK ITF DRIVE DETECTED BAD PARITY 
25$ 30, CONTINUE 
RO, PRI200 sPRIGT HEADPE 
sPRIGT “SERCON PAPITY® 
RO, NERSTT STARE STATISTICS FOR CTRER ERRORS 
ZEGRCR RECCVEPY SEQUENCE FIRISHEC KETUGS 
@SPAR,P.CSICRS) ;CHECK Tf COMTROLLER DETECTC SERCCH PARITY EGRECE 
22$ sVES, GO RETRY COPMAND 


@BITSIBITIIBITIO,P.DSTT(RS) ;CHECK IF NC POSITICAIAC 
22$ sYES, RETRY CCHPARD 
SBITOUIBITIIBIT2,P.ASSNCRS) SCRECK IF NO POSITION 

3 DURING DRIVE ASSIGNMENT 
22$ sYES, RETRY CCHYARD 
#PITI2ZIBITI3,P.DSTICES) ;RESET RE-SFER ARD KE-CFESET 
@BIT11,P.DSTTCRS) ZSET RECALIPRATE CRIVE 
@PECAL,P.CMRD(RS) 3LOGAD RECALTIBRATE CONPARD 


RO,G.PUSH sPUT PAPAWETER BLCCE FN CCM¥ARD 
3 IBITIATICN GUEVE 
Pc aRETURN 


SEG 0153 


zl 
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DZR6PB.P11 


5956 
$957 
5958 
5959 
5960 
$961 
5962 
$963 
5964 
5965 
$966 
5967 
5968 
5969 
$970 
5971 
5972 
5973 
5974 
5975 
5976 
5977 
5978 
5979 
5980 
5981 
5982 
5983 
5964 
$985 
$986 
5967 
5988 
5989 
$990 
$991 
5992 
5993 
5994 
5995 
5996 
5997 
$998 
5999 
6000 
6001 
6002 
6003 
6004 
6005 
6006 
6007 
6008 
6009 
6010 
6011 


032004 
032012 
032014 
032020 
032022 


032024 
032032 
032034 
032040 
032042 


032044 
032050 
032052 
032060 
032062 
032066 
032070 
032074 
032076 


032100 
032106 
032110 
032114 
032116 
032122 
032124 
032132 
032140 
032146 


032150 
032156 
032160 
032164 
032166 


032170 
032174 
032176 


032204 
032706 
032212 
032214 


032216 
032224 
032226 


032234 
032236 
032242 


032765 
001404 
004037 
061270 
000207 


032765 
001404 
004037 
061306 
000207 


004037 
032166 
032765 
001407 
004037 
061172 
004037 
032166 
000412 


032765 
001420 
004037 
061207 
004037 
032166 
042765 
052765 
112765 
000712 


032765 
001404 
004037 
061406 
000207 


005765 
001410 
026565 


103004 
004037 
062162 
000207 


032765 
001015 
026565 


103411 
016546 
005416 


004000 
036524 


020000 
036524 


036714 
000002 
030076 
030554 


000040 
030076 
030522 
034000 
004000 
000112 
001000 
036524 


000022 


000022 


036524 


001400 


000024 


000012 


000020 


000020 


000034 


000036 


000150 
000150 
000001 


000034 


000012 


000016 
000010 
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ERROR RECOVERY SEQUENCE Sec 0153 
25$% BIT @MEM,P.CS2(R5) sCHECK TF NCH-EXISTEDT PERCY 
BEG 30$ 30, CONTIRUE 
JSR RO, CONERR SPRIST READER 
ERRO44 SPRIGT “BON-EXISTERT MEPORY® 
RTS ec sPETORS 
30$: BIT #UPE,P.CS2(RS5) CHECK IF UNIBUS PARITY 
BEQ 35$ 30, CONTINUE 
JSR RO, CORERK SPRIGT READER 
ERRO45 SPRINT “URIBUS PARITY" 
RTS Pc sRETURS 
35$3 JSE RO, TSTORP sCHECK TF DPCP DRIVE ERFCR 
60$ sYES, ERROR RETURNS 
BIT #SKI,P.ERCRS) SCHECK ITF SEER INCOMPLETE 
BEQ 4s$ 30, CONTINUE 
JSK RO,PRI200 sPRIST READES 
EPRO38 sPRIRT “SEER INCOPPLETE® 
JSR RO, SKISTT STAKE SEEK INCOMPLETE STATISTICS 
60$ SERPCR RECOVERY FINISHED RETURE 
BR 48s 3CC ISSUE RECALIBFATE 
45$: BIT @DROT,P.D0S(R5) ZCHECK IF ORIVE OFF TRACE 
BEQ 505 380, CORTINVE 
JSE RO, PRI 200 SPRINT READER 
ERRO39 SPRINT “DRIVE OFF TRACK® 
JSR RO, NERSTT STAKE STATISTICS ON OTHER ERRORS 
60$ dEND OF ERRCR RECCVERY RETURE 
48S: BIC @PITLLIIGITIZIPITI3,P.DSTICRS) ;RESET STATUS 
BIS @BIT11,P.DSTT(CRS) ZSET PECALIBRATE ISSUED 
nove @RECAL,P.CHND(RS) 3LGAD RECALIBRATE 
BR 22$ sFRQUEUE COMMARD 
50$: BIT SCOE,P.ER(RS) j;CHECK IF CYLINDER ADDRESS CVERFLCE 
BEQ E0$ "0, CONTINUE 
JSR RO, CONERR SPRINTER HEADER 
ERROS1 SPRIBT “CYLINDER ADDRESS OVERFLOU® 
60$: RTS Pc sRETURD 
E0$: tst P.WCRCRS) sCHECK TF FIBAL WCRE COUNT IS ZEKC 
BFEQ 58 268, CONTINUE 
cwe PoWCRCR®),P.UCC RS) CHECK THAT PIBAL WCKD CCURT IS LESS 
3 THAN OP EGUAL TO INITIAL BORE COUNT 
BHIS S$ sYES, CONTINUE 
JSR RO, CORERR sTYPE "WCROD COURT IRVALTD™ 
ERRO70 
RTS Pc sRETURD 
S$: BIT #PAIGIBAI7,P.CSI1CPS) sCHECK IF BUS ADDRESS PITS 1€ CR 17 SET 
BNE 6s 3YES, REPORT ERRCP 
cup P.BAR(RS ),P.BALO(RS) 2CFECK TRAT FIRAL BUS ADDRESS IS GREATER 
3 THAR OR EQUAL 10 INITIAL BUS ACORESS 
BLO 8$ 3G, REPCRT ERECE 
mov PeWC(RS),-(SP)  ;PUT INITIAL WORD CCUNT ON STACK 
WEG (SP) SVAKE IT POSITIVE 


z/a 











RK611/RKOG PERFORMANCE EXERCISER MAIWDEC DZR6P-8 
OZR6PB.P11 


6012 
6013 
6014 
6015 
6016 
6017 
6018 
6019 
6020 
6021 
6022 
6023 
6024 
6025 
6026 
6027 
6028 
6029 
6030 
6031 
6032 
6033 
6034 
6035 
6036 
6037 
6038 
6039 
6040 
6041 
6042 
6043 
6044 
6045 
6046 
6047 
6048 
6049 
6050 
6051 
6052 
6053 
6054 
6055 
6056 
6057 
6058 
6059 
6060 
6061 
6062 
6063 
6064 
6065 
6066 
6067 


032244 
032246 
032252 
032256 
032260 
032264 
032266 


032270 


032276 
032300 
032302 
032306 
032310 


032312 


032320 
032322 
032326 
032330 


032332 
032340 
032342 


032346 


022352 
032354 
032362 
032370 
032374 
032402 
032404 
032412 
032414 
032422 
032424 
032432 
032440 
032446 
072454 


032456 
032464 
032472 
032476 
032500 
032504 


032506 
032514 
032520 
032522 


11-AUG-76 


006316 
066516 
026526 
101404 
004037 
062205 
000207 


026565 


001405 
101014 
004037 
062231 
000207 


026565 


103004 
004037 
062252 
000207 


032765 
001002 
000137 


105765 


001117 
016537 
016537 
005437 
022737 
103013 
026565 
001021 
076565 
001015 
012737 
112737 
016537 
016537 
000456 


016537 
016537 
105737 
001403 
105337 
000416 


112737 
105737 
001403 
105337 


00:00 

000010 
000024 
036524 


036524 


000026 


036524 


010000 
033034 
000147 
000010 
000012 
001632 
000400 
000026 
000030 
000400 
000001 


000004 
000002 


000026 
000030 
001634 
001634 
000025 
001635 


001635 
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ERROR RECOVERY SEQUENCE 


000002 10S: 


000004 15$: 


000034 E1$: 


2$3 
001630 
001632 
001632 
000004 
000002 
001632 
001640 215: 


001634 
001636 


001634 25$: 
001636 


001634 26S: 


ASL 
400 
CMP 
BLOS 


- JSR 


ERRO71 
RTS 


(se) sMULTIPLY BY 2 
P.BALO(RS),(SP) sCALCULATE PAXIPUP PINAL ADDRESS 
P.-BARCRS),(SP)* PARE SURE IT IS BOT TO LARCE 


10$ 26000 ADDRESS COBTIRUE 
RO, CONERR sTYPE "BUS ADDRESS IBVALID® 
Pc sRETURS 


P.DCYLC(CRS),P.CYLNCES) ZsCHECK THAT FINAL CYLINDER 1S CREATES 
3 THAN OP EQUAL 10 INITIAL CYLISCEP 


18$ 3TF EQUAL CHECK TRACK/SECTOR 

E1$ STF GREATER THAR, DETERPINE ERRCE 
RO, CONERR STYPE “CYLIN ACORESS INVALID® 

Pc sRETURE 


P.DTSC(CRS),P-SECT(RS) sCRECK TRACK/SECTOR GREATER THAN OF 
3 EQUAL TO INITIAL VALUES 


E1$ sYES, GO IETO ERRCR RECOVERY 
RO, CONERR sTYPE “SECTOR/TRACK INVALTO® 
Pc 
S0TE,P.ERCRS) sCHECK FOR DRIVE TIPING ERROR 
2$ sYES, PROCESS DRIVE TIMING ERROR 
E2$ 3NO, CONTINUE 
P.RERDC(RS) sCHECK IF FIRST DATA ERPOR IR 
a 6RETRY SECUEBCE 
30$ 380, REPORT ERRCR 


P.BALC(RS),RTVYBA ;STCRE SUPPLIED PUS ADDRESS 
P.WCCRS),PTYUC STORE SUPPLIED WCRD COURT 


RTYWC sMAKE IT POSITIVE 

$256.,RTYUC aCHECK If LESS THAT OR EQUAL TO A SECTOR 
21$ 3YES, WORK WITH CRE SECTOR 
P.DTS(RS),P.SECTCRS) sCRECK IF STARTING TRACK ANC SECTOF 
25$ sWOT RETRY 2 SECTCRS 
P.DCYL(RS),P-CYLE(RS) SCHECE TF STAPTING CYLIROES 

25$ 3¥O, RETRY 2 SECTCRS 

#256.,RTYUC sSET WORD COUNT = 1 SECTOR 

#1,RTYSCH sSET SECTOR COURT = 1 


P.SECTCRS),RTYSEC sLCAD SECTCHR ABC TRACK 
P.CYLNCRS),PTYCYL ZLOAD CYLINDER 
30$ 3CO REPORT ERFCR 


P.DTSC(RS),RTYSEC 3SET SECTOR ANT TRACK 
P.DCYLCRS),RTVCYL s;GET CYLINDER 


RTYSEC sCHECK IF SECTCR = 0 

26$ sYES, GC DECRFRFAT TRACE 
RTYSEC SDECREMENT SECTOR 

28$ SDETERMINE WCRD CCUNT 
#21.,RTYSEC sLOAD SECTOR = 21 

RTYTRE sCHECK TF TRACK 0 

27$ sVYES, GC DECKEMENT CYLINDER 
RTYTRE SDECREMENT TRACK 


SEG 0154 


K/a- 
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DZR6PB.P1i1 11-AUG-76 00:00 ERROR RECOVERY SEQUENCE S&é@ 0155 
6068 032526 000405 BR 28$ SDETERMIBRE WORD COURT 
6069 
6070 032530 112737 000002 001635 27$: MOVR #2, RTYTRK sLOAD TRACK = 2 
6071 032536 005337 001636 DEC RTYCYL SDECRENEST CYLINDER 
6072 032542 004737 036412 28$% JSR PC, CALUC SCALCULATE RETRY WORD COUNT 
6073 032546 112737 000002 001640 nove @2,RTYSCE sUCAD SeCTGR CCURT = 2 
6074 032554 022737 001000 001632 CMP #512.,RTYUC sCHECK IF LESS THAN OP EQUAL 
6075 032562 101004 BAI 29$ 3 TwO SECTORS 
6076 032564 012737 001000 00163? nov #512.,RTYUC SAKE If 512 
ode. 032572 000407 BR 30$ 260 GEPCET ERBCR 
6078 
6079 032574 022737 000400 001632 29§: cuP #256 .,RTYUC sCHECK IF ORLY OBE SECTOR 
6080 032602 103403 BLO 30$ 3¥0, GO REPORT ERPOR 
eee 032604 112737 000001 001640 nOVB #1, RTVSCH sLCAC SECTOR CCUAT = 1 
6082 
6083 032612 004037 030076 205: JSR RO, PRI200 sPRIBT READER 
6084 032616 061321 ERRO46 SPRIBT DRIVE TIPIFG ERRCR 
60865 032620 105765 000120 TSTB P.TERC(RS) SCHECK TF IBHIBTT ERROR RECC VERY 
6086 032624 001016 BWE 35$ sYES, GO CLEAR UP FOR NEXT COMM ART 
6087 032626 105265 000147 IncsB P.RERDC(RS) STUCRENEBT REREAD COUNT 
6088 032632 122765 000043 000147 CwPB #43,P.RERD(RS) ZCHECK TF RETRY URSUCCESSFUL 
6089 032640 101410 BLCS 35$ sYES, GO IBCICATE URSUCCESSFUL 
6090 3 RECOVERY 
6091 032642 122765 000121 000123 crPe @RDDATA,P.RCMDCRS) sCHECK IF READ DATA 
609? 032650 001407 BEQ 37$ 3sYES, GO TO RECOVERY SEQUENCE 
6093 032652 122765 000021 000147 CPP #21,P.RERD(RS) ZCHECK TP RETKY UNSUCCESSFUL 
6094 032660 101026 BHI 40$ 340, GO 10 RETRY SEQUENCE 
6095 032662 004737 030724 35$: JSR PC, UNRECY SCLEAR UP FOR UNSUCCESSFUL RECOVERY 
be 032666 000207 RTS Pc sRETUPS 
6097 
609F 032670 122765 000021 000147 37$: CwPP #21,P.RERD(RS) sCHECK IF OFFSET #400 MICPO-INCRES 
6099 032676 001017 BNE 40$ 3G, CONTINUE RECOVERY . 
6100 032700 122737 000001 001640 C¥PR #1, PTYSCh SCHECK TP BOMBER CF SECTCRS = 1 
6101 032706 001404 BEQ 38$ sYES, D0 OFFSET 
6102 032710 122737 000025 001634 cree #21.,RTYSEC SCHECK TF MID-TRANSFER SEEK 
6103 3 6S REQUIRED 
6104 032716 001761 BEQ 35$ sYES, INDICATE OMSUCCESSFUL RETKY 
6105 032720 010446 38$: MOV R4,~(SP) sSTORE P4 OR THE STICK 
6106 032722 116504 000000 MOVE P.DRVNCRS),R4 ZCET DRIVE HUMBER FOR INDEX 
6107 032726 146437 001510 001507 BICB INTMSK(R4),0.CVER 300 NOT SEER BEFCRE DATA 
6108 3 TRANSFER (RESETTING OFFSET) 
6109 032734 012604 MOV (SP )e,R4 SRESTORE R4 
6110 
6111 032736 004037 036230 40$3 JSR RO, DETOFF SDETEPHIBE TF CPRSET INSTRUCTICH 
6112 032742 033032 50$ ZOFPSET ISSUED RETURN 
6113 032744 116565 000123 000001 MOVB P.RCMD(RS),P.CMND(RS) ZLOAD CONMABD 
6114 032752 013765 001634 000004 nov RTYSEC,P.SECT(RS) jsLCAD SECTCPR AND TRACE 
6115 032760 013765 001636 000002 uov RTVCYL„P. CVLVCAS) ZLCAD CYLTACES 
6116 032766 013765 001630 000010 MoV RTYPA,P.BALOCRS) LOAD BUS ADDRESS 
6117 032774 013765 001632 000012 MOV RTYWC,P.UC(RS) ZLOAD WORD COUNT 
6118 033002 005465 000012 WEG P.BC(RS) SMAKE IT WECATIVE 
6119 033006 122765 000131 000001 cues @URTCHK,P.CPND(RS) sCHECK IF WHITE CHECK 
6120 033014 001003 BNE 45$ 3NO, ISSUE COPMMART 
6121 033016 052765 000200 000014 BIS @W.UCK,P.PRST(RS) ZYES, SET ISSUE WRITE COMPAND 
6122 033024 004037 050706 45$% JSR RO,Q.PUSH JENQUEUE PARAPETER BLOCK ITB 
6123 033030 001324 Craita 3 CCPHAND IBITIATICNH QUEVE Lim 











RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B8 


DZR6PB.P11 


6124 
6125 
6126 
6127 
6128 
6129 
6130 
6131 
6132 
6133 
6134 
6135 
6136 
6137 
6138 
6139 
6140 
6141 
6142 
6143 
6144 
6145 
6146 
6147 
6148 
6149 
6150 
6151 
615? 
6153 
6154 
6155 
6156 
6157 
6158 
6159 
6160 
6161 
6162 
6163 
6164 
6165 
6166 
6167 
6168 
6169 
6170 
6171 
6172 
6173 
6174 
6175 
6176 
6177 
6178 
6179 


033032 


033034 
033042 
033044 


033050 
033054 
033062 
033070 
033076 
033104 
033112 
033116 
033124 
033126 


033134 
033136 


033144 
033146 
033152 


033160 
033162 
033170 
033174 
033200 
033202 
033204 
033206 
033210 
033214 
033216 
033222 
033224 
033230 
033232 
033240 
033246 
033252 
033254 


033256 
033260 
033264 
033272 
033274 
033276 
033302 
033304 
033310 
033312 
033316 
033320 


11-AUG-76 00:00 


000207 


032765 
001002 
000137 


004737 
112737 
016537 
016537 
016537 
016537 
005437 
022737 
103021 
026565 


001004 
026565 


001406 
004737 
022737 


1030023 
012737 
016546 
042716 
006216 
006216 
006216 
006216 
022637 
001420 
004037 
061224 
004037 
033370 
052765 
112765 
004037 
001324 
000207 


010446 
113704 
136465 
001013 
012604 
004037 
062076 
004037 
033370 
004037 
001324 
000207 


020400 
033372 
036150 
000001 
000026 
000030 
000010 
000012 
001632 
000400 


000026 


036412 
000400 


000400 
000052 
160017 


001636 
030076 
030570 
004000 


000113 
050706 


001635 
001503 
030076 
030570 
050706 


000034 


001640 
001634 
0016 36 
001630 
001632 
001632 


000002 


001632 


001632 


000150 
000001 


000057 


MACY11 30(1046) 01-DEC-77 14315 PAGE 134 


ERROR RECOVERY SEQUENCE 


50$: 
E2$% 


15$: 


18$: 
20$: 


30$: 


RTS 


BIT 
BRE 
Jue 


JSR 
nOVB 
MOV 
uov 
NOV 
nov 
NEG 
CMP 
BRIS 
CwP 


BWE 
CMP 


BEQ 
JSR 
cee 


Pc sRETUPA 
@OPIUAVRC,P.ER(RS) sCHECK IF HEADER TYPE ERROR 


28 3YES, PRCCESS ERECR 

E3$ 30, CON,TINUE 

PC, GETCUR dGET CURRENT RECISTER STATUS 
#1, RTYSCa sLOAD BETRY SECTCR COUNT TCG 1 


P.DTSC(RS),RTYSEC sSTOPE CURRENT SECTOR AND TRACK 
P.DCYLCRS),RTYCYL sSTORE CURRENT SECTOR 
P.BALO(CRS),RTYBA 3CET IBITIAL BUS ADDRESS 
PoWCCRS),PTYUC GGET INITIAL WORD COURT 


RTYWC SAKE IT POSITIVE 
$256.,RTYUC SCHECK ITF LESS THEN OR EQUAL TO CRE SECTCE 
20$ SRETEY CCHNARD 


P.DTS(RS),P-SECT(RS) sCRECK IF CUFREBT SECTCR AND TRACK EGUILS 
3 ISITIAL TRACK AND SECTOR 
1s$ gC, CALCULATE DESIFED SECTCR 
P.DCYLCRS),P.CYLNCRS) ZCHECR If CURRENT CYLINDER EQUALS 
3 IBITIAL CYLINDER 


18$ sYES, USE IWITIAL CYLINDER, TRACK, AND SECICE 
PC,CaLuc sCALCULATE WCRO COURT 
€256.,RTYUC sCHECK TF WORD COUNT LESS THAW OR EQUAL 
3 TO ORE SECTOR 
20$ SYES, USE CALCULATED WORD COUNT 
#256.,RTYUC 30SE 256 WORDS 


P.B1OCRS),-CSP) ZSSTOKE DRIVE CYLINDER ADDRESS 
@°C<M.CADD>, (SP) 3THROW AWAY PARITY AND MESSAGE TYPE 


(SP) aSHIET 4 BITS RIGHT 
(SP) 
(sP) 
(SP) 
(SP) ¢,RTYCYL SCHECR TP CYLIACE® IS CCRRECT 
30$ sYES, ISSUE READ READER 
RO, PRI200 SREPORT ERROR 
sTYPE *¥ISPOS®* 
RO, OPISTT SCET CPI/MISPCSITIOHING STATISTICS 


JERROR THRESHOLD EXCEEDED RETURN 
#PITI1L,P.DSTTC(RS) ZSET RECALIBRATE ISSUED 
@RECAL,P.CMRD(ARS) sLCAD RECALTBRATE IN PARAPETER PLOCE 


RO,Q.PUSH sPUT PARAMETER BLCCR TH COMPARD 
3 IBITIATION QUEUE 
Pc sRETURD 
R4,-(SP) sSTORE #4 OR THE STACK 
RTYTRE,ZR4 SCET TRAC® FOR INDEX 
HoHEAD(R4),P.PLILC1(RE) SCHECR IP CCRRECT HEAD IS SELECTFE 
35$ sYES, CONTINUE 
(SP )o, 84 SRESTORE R4 
RO, PRT 200 SPRIBT HERD SELECT ERPCR 
RO, OPTSTT SPECORD AS AB OPI 
SERPCR THRESHCLD FXCEEDFO RETURN 
RO,Q.PUSH SRETSSUL COPPARD 
Pc SPETUPA 


SEG O16 


M /2 





® @ @ @ @ @ @ @ @ @ @ @ @0@ 0 0 @ @ @ @ @ @ 








€ 

REGIL/REC< PPRFCRPANCE EXERCISEk PAINDEC DZREP-8 MACY11 30€1046) 0'-'"2-77 14:15 PACE 135 | 
D7R6r*.PAl 11-AaUG-76 00:00 ERROR RECOVERY SFQUFNC? ec 01%? q 

6180 

6181 093322 012604 35$: MOV (SP )*,R4 PPESTCRE R4 @ 

6182 033324 05276£ 000020 000150 B1s #PIT4,P.OSTTC(RS) $SET READ ALL HEADERS ISSUED 

6193 033332 013765 001634 000004 MOV RTYSEC,P.SECTC(RS) sLCAD SECTCe Aart TRACE 

6184 033340 013765 001636 000002 nov RTYCYL,P.CYLNC(R®) jsLOAD CYLIACER é 

6185 033746 012765 064776 000010 nov GHDCUFF,F.BALC(RS) 3LOAD ADDRESS CF HEADER BUFFER 

6186 033354 112766 000164 000001 nove @PDALAD,P.CPNDCRS) 3LOA0 CCPRARC 

6187 033362 004037 050706 JSR RO, 0.PUSH PUT PAPAWETER BLCCR IN CONPAND é 

6188 033366 001324 ciurro 3 IRITIATION QUEDE 

sues 033270 000207 60$: RTS Pc sRETURS e 

6190 

6191 033372 032765 000200 000034 £35: BIT #BSE,P.ER(RS) ;CHECK FOR Bar SECTCR EPROR 

6192 033400 001403 BEQ 5$ 2P0, CONTINUE 

6193 033402 004737 041560 JSR PC,PDSECT PSEPUICE BAD SECTCR € 

6194 033406 000207 RTS PC ;RETURD | 

6195 

6196 0633410 032765 100000 000020 55: BIT @OLT,P.CS2(RS) j CHECK IF DATA LATE é€ 

6197 033416 001444 BFQ E4$ 380, CORTINVE 

6198 033420 004737 027242 JSk PC, PRIOOG 3TYPE HEADER 

6199 033424 032777 020000 145506 BIT #S¥13,eSuP 3CHECR T° INHIBIT PRINT OUT ¶ 

6200 033432 001004 BNE 10$ #VES, CPECK IF HALT OW ERROR | 

6201 033434 104401 061741 TYPE 7 ERRO47 #TYPE "DATA LATE® | 

6202 033440 004737 025550 JSR PC, PRISTT PRIBT CORTRCLLES STATUS € 

6203 033444 004737 030472 10$: JSR PC, ALTOOC CHECK If HALT OW ERROR | 

6204 033450 005237 001622 INC DLTCNT ZTNCREWENT DATA LATE COUNT 

6205 033454 022737 001000 00162? cvp #T.OLT,OLTCNT ;CHECK TF TRRESRCLOD EXCEEDED @ 

6206 033462 103006 BHIS iss tssüor CCPR AEE | 

6207 033464 104401 057554 TYPE 7 ERPOOO TYPE FATAL EPROR | 

6208 033470 104401 060157 TYPF FE RROOD #TYPE DATA LATE TPRESHOLD EXCEEDEC @ 

6209 033474 000000 HALT W | 

6210 033476 000776 BP 2 

6211 é 

6212 033500 105765 000150 15$: TSTP P.DSTT(RS) sCHFCE IF FIRST ERROR | 

6713 033504 100005 BPL 20$ zud, RETSSUE CC¥MAND | 

6214 033506 042765 100200 000150 BIC SPITLSIBIT7,P.DSTT( PS) CLEAR ERSCR EWQUEVED AND FIRST FRECE ¶ 

6215 033514 005037 001562 CLR EPRRPRO CLEAR ERROR RECOVERY IN PROGRESS | 

6216 033520 004037 050706 20$: JSR RO,Q.PUSH ZFNQUEUE PARAWETER PLOCK IN COMPABD 

6717 023524 001324 CINTTO 3 IRITTATICH QUEUE @ 

6218 033526 000207 RTS PC ;RETUPH | 

6219 

6220 033530 032765 100000 000034 £4$: BIT #DCK,P.ER(RS) ;CHECK IF DATA CHFCK € 

6221 033536 001002 BNE 2$ 3YES, START KECOVERY | 

$223 033540 000137 034340 JMe ES$ 360, CCWTINOE ‘ « 

6224 033544 112737 000001 001640 285: nove #1,RTYSCN #SET SECTOR COUNT = 1 | 

6225 033552 016537 000004 001634 wov P.SECT(RS),RTYSEC STORE RETRY SECCTOR AND TRACK 

6226 033560 016537 000002 001636 mov P.CYLW(R5),RTYCYL ;STORE PETRY CYLINDER @ 

6227 033566 016537 000010 001630 nov P.BALO(RS),RIYBA 3STORE RETRY BUS ADDRESS | 

6228 033574 016537 000012 001632 nov P.WC(RS),RTYWC STORE RETRY BCRD COUNT | 

6229 033602 005437 001632 WEG RTYWC MAKE IT POSITIVE @ 

6230 033606 022737 000400 001632 cre #256.,RTYWC sCHECK IF LESS THAN OR EGUAL TO # SECTOR | 

6231 033614 103043 BHIS 15$ 3YES, CPECK IF FCC CORRECTICN | 

6232 033616 016537 000026 001634 mov P.DTS(RS),/RTYSEC 3STCRE PRESERT TPACK AWD SECTOR | 

6233 033624 016537 000030 001636 mov P.DCYL(RS),RTYCYL s;STORE PRESENT CYLINDER | 

6234 033632 105737 001634 TSTB RTYSEC CHECK If SFCTOR = 0 | 

6235 033636 001403 BEQ 11$ #YES, DECREVENT TRACK a3 @ 

€ 





REG611/RKOG PERFORMANCE EXERCISER MATHDEC DZRG6P-8 
OZR6PP.P11 11-AUG-76 00:00 


6236 033640 105337 001634 

6237 033644 000416 

6238 

6239 033646 112737 000025 001634 11$: 
6240 033654 105737 001635 

6241 033660 001403 

6242 033662 105337 001635 

6243 033666 000405 

6244 

6245 033670 112737 000002 001635 12$: 
6246 033676 005337 001636 

6247 033702 004737 036412 13$: 
6248 033706 022737 000400 001632 

6249 033714 103003 

62750 033716 012737 000400 00163? 

6251 033724 004037 030076 15$: 
6252 033730 061355 

6253 033732 105765 000120 

6754 033736 001123 

6255 033740 122765 000121 000123 

6256 033746 001101 

6257 033750 032765 000100 000034 

6258 033756 001075 

6259 033760 022765 010040 000060 

6260 033766 101406 

6261 033770 005765 000060 

6262 033774 001403 

6263 033776 005765 000062 

6264 034002 001004 

6265 034004 004037 036524 16$: 
6766 034010 062121 

6267 034012 000207 

6268 

6269 034014 004737 025634 17$: 
6270 034020 105765 000210 

6271 034024 001017 

ytd 034026 013765 001630 000214 

6274 034034 013765 001632 000222 

6275 034042 013765 001632 000220 

6276 034050 112765 177777 000117 

6277 034056 004737 023036 

6278 034062 034072 

6279 034064 004737 035500 18$: 
6280 034070 000207 

62861 

62862 034072 032777 020000 145040 20S: 
6283 034100 001024 

6264 034102 104401 062015 

6285 034106 104401 063274 

6286 034112 016546 000060 

6287 034116 004737 052144 

6288 034122 104401 001165 

6289 034126 104401 063303 

6290 034132 016546 000062 

6291 034136 004737 052144 


DECB 
BR 


nove 
TsT8 
BEG 
DECB 
BP 


MOVB 
DEC 
JSR 
CMP 
BRIS 
nov 
JSR 
ERRO48 
TSsTB 
BWE 
curs 
BNE 
BIT 
BWE 
cup 
BLOS 
151 
BEQ 
Tst 
BNE 
JSR 
ERR066 
RTS 


JSR 
tstTe 
BRE 
MOV 


nov 
MoV 
MOVB 
JSR 
20$ 
JSR 
RTS 


BIT 
BWE 
TYPE 
TYPE 
MOV 
JSR 
TYPE 
TYPE 
MoV 
JSR 


MACY11 30€1046) Oi-DFC-77 14315 PACE 136 


ERROR RECOVERY SEQUENCE 


RTYSEC 
13$ 


§21.,RTYSEC 
RTYTRE 


62, RTYTREK 
RTYCYL 

PC, CALUC 
#256.,RTYUC 
15$ 
€256.,RTYWC 
RO, PRI200 


P.TERC(RS) 
40$ 


SDECRENENT SECTOR 
260 CALCULATE WOKE COUNT 


sSET SECTOR = 21 

sCHECK Tf TRACK = 0 
sYES, DECREPERT CYLINDER 
SDECRENERT TRACK 

60 CALCULATE BORD COUNT 


sSET TRACK = 2 

SDECREMEST CYLINDER 

SCALCULATE WCBD CCURT 

SCHECK Tf LESS THIN OR EQUAL TO CRE SECTCE 
SYES, PERFORM ECC CORRECTION 

SPAKE IT OBE SECTOR 

sPRIGT MEACES 

sPRIUT DATA CRECE 

SCHECK IF IBHIBIT ERRROR RECOVERY 

SYES, INDICATE UNSUCESSFUL RECOVERY 


GPODATA,P.RCHO( HS) SCHECK IP PEAD DATA 


os 


380, DO BOT DO ECC CORRECTION 
sCHECE IF CORRECTABLE 
3®0, DO BOT OC ECC CURRECTION 


30$ 
910040,P.eP0scRS) sCBECR IF ECC PCSITION TCC Lance 


16$ 
P.EPOS(RS ) 
16$ 
P.EPAT(RS) 
17$ 
R20, CORERR 


ec 
PC, ECCCOR 


Pe ASSH(RS) 
18$ 


sYES, REPORT ERRCR 

sCHECK TF ECC POSITION = 0 
sYES, REPORT ERRCP 

sCHECR If ECC PATTERN = 0 
380, DO ECC CORRECTION 
sTYPE "ECC LOGIC FRROR® 


sRETURN 
300 ECC CORRECTION 


SCHECK TF IW ASSICHWERT SEQUENCE 
sYES, OO WOT CHECK ECC CORRECTION 


RTYBA,P.ERHD(RS) 3LOAD START OF SFCTOR FOR 


DATA COMPARISOR 


e 
RTYWC,P.BFCP(PS) sLOAD WUMBFE CF WORDS CF 


RTYUC,P.CMLG(RS) 3 
#-1,P.ECMP(RS) 


PC, CMPBUF 


PC, SUPECY 
PC 


@S013,@SuF 
30$ 


7ERRO60 
7ERR211 


SECTOR PRESENT 

sSET ECC COPPARE FLAG 

SCHECK FCC CORRECTION 
SIMDICATE ECC MISCCRRECTION 
ZINDICATE SUCCESSFUL RECOVERY 
sRETURD 


sCHECR TF IRHIBIT ERRCR PRINT CUT 
3YES, GO TO RECOVERY SEQUENCE 
STYPE “ECC PISCORRECTIUR® 

STYPE “REPCS® 


P.EPOS(RS),-(SP) sSTORE REPOS FOR PPINT OUT 


PC,BINOCT 
a SCRLF 
@ERR212 


sCONVERT TO OCTAL 
STYPE <CR><LF> 
STYPE *RKPAT® 


P.EPATCRS),-(SP) sSTCRE REPAT FOR PRINT OUT 


PC,BIRNOCT 


sCOVERT TO OCTAL 


SEG 0156 


8/3 











RK611/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-P 
ERROR RECOVERY SEQUENCE 


DZR6PB8.P11 


6292 03414? 
6293 034146 
6294 034152 
6295 034156 
6796 034164 
6297 034166 
6298 034174 
6799 034176 
6300 034204 
6301 034206 
6302 034212 
6303 

6304 034214 
6305 034222 
6306 

6307 034224 
6308 034226 
6309 034232 
6310 034240 
6311 034242 
6312 034246 
6313 034250 
6314 0734256 
6315 034264 
6316 034272 
6317 034300 
6318 034306 
6319 034312 
6320 034320 
6321 034322 
6322 0734330 
6323 034334 
6324 034336 
6325 

6326 034340 
6327 034346 
6328 034350 
6729 

6330 034354 
6331 034360 
6332 034362 
6333 034366 
6334 034370 
6335 034374 
6336 034402 
6337 034404 
6338 034410 
6339 

6340 034412 
6341 034420 
6342 034426 
6343 034432 
6344 034440 
6345 034446 
6346 034454 
6347 034462 


11-AUG-76 


104401 
004737 
105265 
122765 
101410 
122765 
001407 
122765 
101021 
004737 
000207 


122765 
001007 


010446 
116504 
146437 
012604 
004037 
034336 
116565 
013765 
013765 
013765 
013765 
005465 
122765 
001003 
052765 
004037 
001324 
000207 


032765 
001002 
000137 


004037 
061367 
105765 
001006 
105265 
122765 
101003 
004737 
000207 


016537 
162737 
004737 
116565 
013765 
013765 
013765 
013765 


001165 
035226 
000147 
000043 


000121 
000021 
030724 


000021 


000000 
001510 


036230 


000123 
001634 
001636 
001630 
001632 
000012 
000131 


000200 
050706 


040000 
034512 
030076 
000120 


000147 
000021 


030724 


000024 
000002 
035014 
000123 
001634 
001636 
001630 
001632 


000147 
000123 
000147 


000147 


001507 


000001 
000004 
000002 
000010 
000012 


000001 
000014 


000020 


000147 


001630 
001630 


000001 
000004 
000002 
000010 
000012 


45$: 


48$: 
50$: 


55$: 
60S: 
ES$: 


1$: 


55: 


1052 


TYPE 
JSR 
Ince 
CyPR 
BLOS 
CuPB 
BEQ 
Cres 
BHI 
JSR 
RTS 


cwer 
BRE 


nov 
wove 
BICB 
nov 
JSR 
60$ 
moves 
nov 
uowr 
acy 
MoV 
NEG 
CwPs 
BWE 
BIS 
JSR 
CINITQ 
RTS 


BIT 
BNE 
JP 


JSR 
ERROSO 
TSTB8 
BWE 
IncsB 
CMPR 
BHI 
JSE 
RTS 


MOV 
SUB 
JSR 
MOVB 
MOV 
MoV 
MoV 
MOV 


MACY11 30(1046) 


a SCRLF 

PC, PRERWD 
P.RERDC RS) 
— 
4 


O1-CFPC-77 14:15 PACE 137 


STYPE <CR><LF> 

SPRINT WORD If ERSCE 

STUCKREMENT PETRY COUNT 

SCHECK Tf UNSUCCESSFUL RETRY 
dYES, IWDICATE UNSUCESSPUL FETEY 


$ 
@RODATA,P.RCHDCRS) ZCHECK IF READ DATA 


45$ 
#21,P.RERD(RS) 
50$ 


PC, UNRECY 

Pc 
#21,P.RERD( RS) 
48$ 


R4,-(SP) 
P.DRYUNCRS),R4 


sYES, CHECK FOR OFFSET 

sCHECK Tf ABGUT TC ENTER OFFSET CRERATATICES 
380, DG BEREAD 

sTMDICATE UNSUCCESSFUL FPECOVERY 

sRETURS 


sCHEC® If CPFSET #400 MICRO-IRCHRES 
380, GO DETERMINE IF OFFSET IS TC 
3 BE ISSUED 

sSTOBE R4 OF STACK 

2667 DRIVE HUMBER AS THDEX 


INTMSK(R4),0.0VER ,RESET ISSUE IMPLIED SEEK 


(SP)*,R4 
RO, DETOFF 


SRESTORE R4 
sDETERMIBE TF CPFSET IS TO PE ISSUEP 
ZOFFSET ISSUED PETURN 


P.KRCMDCRS ),P.CHRD(RS) ZREISSUE LAST COMPARD 
RTYSEC,P.SECT(RS) jLCAD SECTCR ABE TRACE 
RTYCYL,P.CYLNC(RS) ;LCAD CYLIBOER 
RTYBA,P.BALOC(RS) 3;LO4D BUS ADDRESS 


RTYWC,P.UCC(RS) 
P.WC(RS) 


sLOAD wORD COURT 
SVAFE IT RECATIVE 


@URICAK,P.CPND(RS) SCHECK If WHITE CHECK 


55$ 


30, GO ISSUE COMPARD 


QU.UCK,P.PRST(RS) ZISSUE WRITE BEFORE BRITE CHECK 


RO,Q.PUSH 

Pc 
SUCE,P.CS2(R5) 
1$ 

E10$ 

RO,PRI200 


P.TERCC(RS) 

58 

P.RFERD(RS) 
$21,P.REKDC(RS) 
10$ 

PC, UNRECY 

pc 


P.BAR(RS),RTYBA 
#2, FTVBA 
PC, CALSEC 


3PUT PARAMETER BLCCK OW COMWARD 
SCOMMAND INITIATICNH QUEVE 
sPETUPS 


sCHECR TF WRITE CRECK ERROR 
3YES, PROCESS WRITE CHECK ERROR 
sO, CONTINUE 


SPRIAT WHITE CHECR EKRCE 


sCHECK IF INHIBIT ERROR CORRECTION AND RETRY 
SYES, IRITIATE WEXT COMPARD 

STUCKEMENT PETRY COUNT 

SCHECK IF 16 REREADS OCCURRED 

3NO, START RECCVERY SEQUENCE 

STNDICATE UNSUCCESSFUL RECCUEFRY 

sPETUPN 


sCET ADDRESS CF BCRD IM ERROR 
ZACJUST ADDFESS 
sCALCULATE SECTOR, TRACK ANC CYLIBDER 


P.RCMD(RS),P.CMND(RS) ZCET PREVICUS COMMAND 
RTYSEC,P.SECT(RS) sGET SECTOR ARO TRACK 
RTYCYL,P.CYLAC(RS) sGET CYLIBCESR 
RTYBA,P.BALO(RS) ;GET BUS ADDRESS 


RTYWC,P.WCC(RS) 


sGET WORD COUNT 


SEG 01°59 


cs 


a a a a fA 











RK611/RKOG PERFORMANCE EXERCISER MATNDEC DZR6P-P 
11-AUG-76 00:00 


OZ7R6PB.P11 


6348 
6349 
6350 
6351 
6352 
6353 
6354 
6355 
6356 
6357 
6358 
6359 
6360 
6361 
6362 
6363 
6364 
6365 
6766 
6367 
6368 
6369 
6370 
6371 
6372 
6377 
6374 
6375 
6376 
6377 
6378 
6379 
6380 
6381 
6382 
6383 
6384 
6385 
6386 
6387 
6788 
6389 
6390 
6391 
639? 
6393 
6394 
6395 
6396 
6397 
6398 
6399 
6400 
6401 
6402 
6403 


034470 
034474 
034502 
034506 
034510 


034512 
034520 
034522 
034524 
034526 
034532 
034534 
034540 
034544 
034550 
034556 
034560 
034566 
034570 
034576 
034602 
034610 
034612 
034616 
034622 
034624 
034630 
034634 
034640 
034646 
034652 
074656 
034662 
034664 
034670 
034676 
034700 
034704 


034706 
034714 
034716 
034720 
034724 
034732 
034734 
034740 
034742 
034750 
034756 
034764 
034772 
035000 
035004 


005465 
052765 
004037 
001324 
000207 


032765 
001001 
000000 
005046 
116516 
006316 
066516 
012637 
004737 
032765 
001037 
052765 
100003 
052765 
004737 
032777 
001013 
104401 
005765 
100402 
104401 
004737 
004737 
042765 
004737 
004737 
105765 
001006 
105265 
122765 
101003 
004737 
000207 


122765 
001007 
010446 
116504 
146437 
012604 
004037 
035012 
116565 
013765 
013765 
013765 
013765 
005465 
004037 


000012 
000200 
050706 


000217 


000214 
001630 
035014 
000002 


000002 


000001 
027242 
020000 


062041 
000150 


062712 
035226 
027476 
100200 
026704 
030472 
0001 20 


000147 
000043 


030724 


000021 


000000 
001510 


036230 


000123 
001634 
001636 
001630 
001632 
000012 
050706 


000014 


000712 


000150 
000150 
000150 
144330 


000150 


000147 


000147 


001507 


000001 
000004 
000002 
000010 
000012 


MACY11 30€1046) O1-CRC-77 14315 PACE 136 


EPROR RECOVERY SEQUENCE 


E10$: 


2$3 


3$3 


4$3 
552 


1052 


1552 


20$: 


25$2 


NEG 
BIS 
JSR 
crurro 
RTS 


BIT 
BWE 
HALT 
CLR 
wOVR 
ast 
ADD 
MOV 
JSK 
BIT 
BWE 
BIS 
BPL 
BIS 
JSR 
BIT 
BNE 
TYPE 
Tst 
BYI 
TYPE 
JSR 
JSR 
BIC 
JSR 
JSR 
TSTB 
BNE 
INCP 
cMuPeR 
BHI 
JSR 
RTS 


chee 
BRE 
MoV 
hove 
BICB 
mov 
JSR 
50$ 
nOovVB 
MoV 
mov 
uov 
MOV 
NEG 
JSk 


P.uCC(RS) SPARE IT RECATIVE 
QU.UCK,P.PRSTCRS) ZSET ISSUE WRITE BEFORE WRITE CRECK 
RO,Q.PUSH JENQUEUE PARAMETER Iu 
3 CCMHABD TNITTATION QUEUE 
pc sRETUPS 


#BIT2,P.ERR(RS) ZSCHECK TF DATA CCPPARE ERROR 


2$ sVES, CCUTINOF PECCESSING ERECE 
3 9° USFRCER ETRY 
-(SP) SMAFE ROOM OW STACK 


P.ERADC(PS),CSP) sCET WORD IR ERRCR 
SP) sMULTIPLY BY 2 
P.EPHD(RS),(SP) sCALCULATE ADDRESS OF MISCOPPAREC wORD 


(SP)¢,RTYBA SLOAD ADDRESS OF BAD WORD 

PC, CALSEC SCALCOLATE CYLIBCER, TRACK, AWD SECTCE 
SBITL,P.DSTTCRS) sCRECK IF DATA TYPE ERROR RAS ALFEADY CCCURSGEC 
10$ sYES, GO TO RETRY SEQUENCE 


ala alata 3SET DATA TYPE EPRCR OCCURFED 
sCHECE IF FIRST EPROR 
s01T0,P.DSTTCRS) 3SET IWITIAL DATA ERROP 


PC, PRIO00 sPRIBT READER 

#SW13,@SuF sCHECR Te IMHIBIT PRINT COT 

S$ sYES, CHECK If HALT OW ERROP 

a ERRO62 STYPE DATA COMPARE ERROR 

P.DSTT(PS) SCHECK TF FIRST ERRCR 

4$ sYES, GC PRIBT ERFCF WCKD 

aERR202 STYPE EPPOR CURIAC ERROP RECOVERY 

PC, PRERWD sPRIGT WORD IW ERROR 

PC, PRIO02 SPRIAT CURREBTLY SUPPLIED COMPARD 
#PITISIPIT7,P.OSTT(PS) CLEAR FIEST ERRCR AWD ERSCKH ERQUECET 
PC, PRIBUF 260 PRINT BUFFER 

PC, FLTOOO SCHECK IF HALT CB ERROR 

P.LERCC(RS) SCHECK TF IWHIBTT ERROR CORRECTICH AND FECCVERY 
15$ SYES, IWDICATE ORSUCCESSFUL RECCVERY 
P.RERDCRS) ZINCRENENT RETRY COUNT 

#43,P.RERDC(RS)  sCHECK TF ERROR RECCVERY UNSUCCESSFUL 

20$ 3NC, GG 10 RECOVERY SEQUENCE 

PC, UNPECY STMDICATE UNSUCCESSFUL PECOVERY 

PC sRETURD 


#21,P.RERD(RS) s;CHECK TR ERTERTAC CFFSET 

25$ 370, DETERMINE IF TINE TO CHANGE CFFSET 

R4,-(SP) sSTORE R4 OR STACK 

P.DRVNCRS),R4 SGET DRIVE RUPBER FCR INDEX 

INTMSK(R4),0.0VER ;RESET SEEK BEFCRE DATA TRANSFER 

(SP)e,R4 SRESTORE R4 

RO, DETOFF SDETERMIBE TF CPRSET TO BE ISSUEC 
SOFFSFT HAS BEEN ISSUED 

P.RCMDCPRS),P.CHND(RS) ZCET LAST ISSUED COPHAND 

RTYSEC,P.SECT(RS) sLOAD SECTOR ABT TRACK ADDRESS 

RTYCYL,P.CYLNC(RS) sLCAD CYLTADER ADDRESS 

RTYBA,P.BALO( RS) sLCAD PUS ACDKESS 

RTYWC,P.NCCRS) sZCET WORD COURT 

P.WC(RS) sMAFE IT WEGATIVE 

RO,Q.PUSH SENQUEUF PARAPETEF BLOCK IM COMPARD 


SEG O1€C 


Dil3 











a oe oe ee ee ee ee ee ee ee ee ee ee ee ee ee 





. 


RF611/R2K06 PERFORMANCE EXERCISER MATNDEC DZR6P-8 MACY11 30(1046) O1-CEC-77 14:15 PAGE 139 











DZR6P8.P11 11-A0G-76 00:00 ERROR RECOVERY SEQUENCE SEQ O1€1 
6404 035010 001324 Crarta 3 IPITYATICH GUEVE 
6405 035012 000207 50S: ats Pc sPETURS 
« 
, 
c 
< 
« 
< 
« 
« 
« 
7 « 
« 
« 
« 
© « 
é « 
€ oats 
.€ 





RK6O11/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


OZR6PB.P11 


6406 
6407 
6408 
6409 
6410 
6411 
6412 
6413 
6414 
6415 
6416 
6417 
6418 
6419 
6420 
6421 
6422 
6423 
6424 
6425 
6426 
6427 
6428 
6429 
6430 
6431 
6432 
6433 
6434 
6435 
6436 
6437 
6438 
6439 
6440 
6441 
6442 
6443 
6444 
6445 
6446 
6447 
6448 
6449 
6450 


035014 
035016 
035020 
075024 
035030 
035034 
035040 
035046 
035052 
035054 
035056 
035060 
035064 
035066 
035072 
035076 
035104 
035112 
035114 
035120 
035124 
035126 
035132 
035134 
035140 
035142 
075146 
035152 


075154 
035160 
035162 
035166 
035172 
035174 
035200 
035204 


035206 
035212 
035220 
035222 
035224 


11-AUG-76 00:00 


010146 
010346 
013703 
166503 
042703 
010337 
066537 
016501 
005401 
006203 
160301 
022701 
103002 
012701 
010137 
116537 
016537 
010346 
116616 
105066 
005046 
116516 
062616 
022716 
103005 
162716 
105237 
000770 


112637 
005046 
113716 
122716 
103005 
162716 
005237 
000770 


112637 
112737 
012603 
012601 
000207 


001630 
000010 
000777 
001630 
000010 
000012 


001630 


000400 


000400 
001632 
000005 
000002 


000001 
000001 


000004 


001635 
001636 


000025 
000026 
001635 
001634 


001635 
000002 


000003 
001636 


001635 
000001 001640 


MACY11 30(€1046) 01-DEC-77 


14315 PAGE 140 


CALCULATE CYLINDER, TRACK, ABC SECTOR FOR RETFY 


eSBTTL CALCULATE CYLINDER, TRACK, AND SECTOR FOR RETRY 


CALSEC: mOV 
mov 
mov 
508 
BIC 
Mov 
a00 
nov 
WEG 
ASR 
suB 
CrP 
BRIS 
MOV 

5$3 mov 
nove 
nov 
MOV 
wOVB 
CLKB 
CLR 
nOvVB 
ado 

10$: cup 
BHIS 
SUB 
Ince 
BP 

15$3 MOVB 

CLR 

MOVE 

CMwPR 

BRIS 

SUB 

Inc 

BP 


1752 


nove 
nove 
Mov 
mov 
RTS 


R1,-(SP) 
R3,-(SP) 
RTYBA,R2 
P.BALO(RS),R3 
8777,R3 
R3,RTYBA 


sSTCKE R1 CH STACK 

sSTORE #3 OF STACK 

2667 ADDRESS OF ERARCR WORD 

SCALCOLATE BYTES CCBRECTLY THRANSEESRET 
sVAKE IT O8 SECTCR BOUNDARY 

sSTORE CALCULATED BUS ADDRESS 


P.BALO(RS),RTVBA sCALCULATE START OF SECTOR WITH ERROR 


R1 

R3 

R3,P1 
#256.,R1 
5$ 


€256.,R1 
R1,8TYUC 


sCET IBITIAL WCRC CCURT 

sMAKE IT POSITIVE 

SDETERMIBE WCROS BEFORE ERACR 
SCALCULATE SUPBER OF WORDS LEFT 


SCH3ECK IF LESS THAR OR EQUAL TC CRE SECICE 


SLOAD RETRY BORD COUNT 
3G, MARE IT OBE SECTOR 
gLOAD RETY WCRO COURT 


Po TPCKCRS),RTVIRK ;STORE RETEY THACE 
P.CYLNC(RS),PTYCYL sSTORE RETRY CYLINDER 


R3,-(SP) 
1(SP),(SP) 
1(SP) 
-(SP) 


P.SECTC(RS ), (SP) 


(SP), (SP) 
#21-4CSP) 
15$ 
822-,(SP) 
RTYTREK 

10$ 


(SP )¢,RTYSEC 
-(SP) 
RTYTRE, (SP) 
#2,(SP) 


(SP) ¢,RTYTRE 
#1,PTYSCH 
(SP )¢,R? 
(SP)o,R1 

Pc 


SSTOGE WORDS TRANSFERRED 
sSTORE wUNBER CF SECTORS 
sCLEAP RICH CREES BYTE 
sMAKE ROOW OB STACK 

sCET TMITIAL SECTOR 

3ADD SECTORS TRANSFERRED 
sCBECK TE SECTCR COUNT CHEATER THAN 21 
380, CHECK TRICK 

SSUBTRACT 272 SECTORS/TRACK 
STECREWERT TRACE 

sCHECR SECTOR COURT 


sSTORE RETRY SECTCR 

sMAFE BCCW Ch TRE STACK 
sSTOKE PETRY TRACE 

SCHECF TRACK CREATER THAN 2 
380, PETURS 

sSUPTRACT 3 TRACKS /CYLINCESR 
STUCKEMENT CYLINCER 

sCHFCK TRAC® COUNT 


sLCAD GETRY CCUNT 

ZIMDICATE ONE SECTCR IM RETRY CCURT 
SRESTORE #3 

SRESTICRE Ri 

sPETURS 


SEG 0162 


Fr3 








RK611/RKOG PERFORMANCE EXERCISER MATNDEC DZR6P-8 


DZR6PB.P11 


6451 
6452 
6453 
6454 
6455 
6456 
6457 
6458 
6459 
6460 
6461 
646? 
6463 
6464 
6465 
6466 
6467 
6468 
6469 
6470 
6471 
6472 
6473 
6474 
6475 
6476 
6477 
6478 
6479 
6480 
6481 
6482 
6483 
6484 
6485 
6486 
6487 
6488 
6489 
6490 
6491 
6492 
6493 
6494 
6495 
6496 
6497 
6498 
6499 
6500 
6501 
6502 
6503 
6504 
6505 
6506 


035226 
035230 
035232 
035234 
035236 
035242 
035246 
035250 
035254 
035256 
035260 
035262 
035264 
035270 
935276 
035300 
035304 


035306 
035312 
035316 
035322 


035324 
035330 


035332 
035334 


035336 
035340 
035344 
035346 
035352 
075356 
035362 
035364 
035366 
035372 
035376 
035402 
035404 
035410 
035414 
035416 
035422 
035426 
035432 
035434 
035440 


035442 
035446 
035452 


11-AUG-76 00:00 


010046 
010146 
010346 
010446 
104401 
016503 
005046 
116516 
006316 
011601 
062603 
010346 
004737 
122765 
103403 
104401 
000436 


016504 
016400 
042700 
005200 


126500 
101402 


005046 
000414 


011404 
042704 
006304 
016404 
162701 
042701 
060104 
011446 
104401 
004737 
104401 
011346 
004737 
104401 
005046 
116516 
004737 
105765 
001003 
104401 
000410 


104401 
017546 
042716 


060214 
000214 


000217 


052144 
000001 


057536 


000214 
000002 
177400 


000217 


177760 


004576 
000004 
177700 


057551 
052144 
057551 


052144 
057551 


000217 
052144 
000217 


057536 
057551 


000214 
177760 


000217 


PRINT FIRST ERROR WORD TH BUFFER 


MACY11 30€1046) O1-DEC-77 14:15 PACE 141 


@S8TTL PRINT FIRST ERROR WORD IB BUFFER 


PRERWD: HOV 
MOV 
MOV 
mov 
TYPE 
uov 
CLR 
novB 
ASL 
nov 
adD 
MoV 
JSR 
cwPe 
BLO 
TYPE 
BR 


S$: MOV 
MoV 
BIC 
Inc 


CwPB 
BLOGS 


CLR 
BP 


75: MOV 
BIC 
ASL 
MoV 
SUB 
BIC 
ADD 
MOV 
9$% TYPE 
JSE 
TYPE 
10$: MOV 
JSR 
TYPE 
CLR 
move 
JSR 
TSTP 
BNE 
TYPE 
BR 
1552 TYPE 
MOV 
BIC 


RO,-(SP) 
R1,-(SP) 
R3,-(SP) 
R4,-(SP) 
aERRO12 © 
P.ERHD(PS),R3 
-(SP) 


P.EPADCPS),(SP) 
(sP) 


(SP),P1 
(SP)e@,R3 
R3,-(SP) 
PC,AIROCT 
———— 
5 


QUESPK 
10$ 


P.ERHD(PS),R4 
2(R4),RO0 
#177400,R0 

RO 


P.ERAD(RS),PO 
7$ 


-(SP) 
9$ 


(R4),R4 
#177760,R4 
ha 


PATTAB(R4),R4 
#4,R1 
#177700,Rk1 
R1,R4 
(R4),-C(SP) 
7BLAMKS 
PC,BINOCT 
BLANKS 
(R3),-(SP) 
PC,RIROCT 
PLANES 
-(SP) 


P.ERADCRS ), (SP) 


PC, BIROCT 
P.ERADCRS) 


@BLANKS 


SSTORE RO OW STACK 

sSTORE R1 OW STACF 

sSTORE #3 OR STACK 

sSTOKE P4 OW STACK 

STYPE ERROR HEADER 

dGET ADDRESS CF START OF SECTCR 
SPARE BOCH OB STACK 

sCET WORD IW EGRCP CF SECTOR 
SPULTIPLY IT PY 2 

eSTORE TT If Ri 

2667 ADDRESS OF BAD WORD 
sSTOKE ADDRESS FOR PRINT OUT 
sCORVERT TO CCTAL 

sCHECR IF IW DESCRIPTOR AREA 
30, CALCULATE WORD 

sTYPE QUESTICH MARKS 

260 TYPE WORD REAT 


sCET HEADER FOR POTTERN INDEX 

sCET FPUMBER OF WORDS WRITTER IN SECTOR 
sFEEF LOW BYTE 

SINCREMENT RG TO PARE OFFSET FROM START 
3 OF SECTOR 

sCHECK TF IW ZERC FILL AREA 

3NC, CALCOLATE ACCRESS CF 

3 WCRO IW DATA FITTEPN 

sLOAC ZERO FOR PRINT OUT 

3CO PRINT EXPECTED CONTERTS 


3CET DATA PATTERN NUMBER POR THE? 
d¥ASK OFF INSIGNIFICANT BITS 
sPULITPLY BY 2 

3CET PATTERN BASE 

sSUPTRACT 4 FROM SECTOR OFFSET 
3¥ARE IT WOO 32 BCROS 

SCALCULATE PATTEBR ADDRESS 

3STORE EXPECTED CONTENTS FOR PRIRT OUT 
sTYPE BLABKS 

sCORVERT TO CCTAL 

3TYPE BLANKS 

sSTORE WORD BEAD 

sCORVERT TO CCTAL 

3TYPE BLANKS 

3¥AKE ROCW OW STACK 

ZSTORE SECTCK BORD PUMBER FCR PRINT OUT 
SCORVERT TC OCTAL 

3CHECR Te ERROR IS Th PATTER WCEC 
30, PRINT PATTERN RUMBER 

$TYPE QUESTION MARKS 

360 RESTOPE REGISTERS 


3TYPE BLARKS 


@P.FRHD(RS),-(SP) sGET FIRST WORD OF SECTOR READ 


#177760,(SP) 


SCLEAR TASIGRIFICANT RITS 


SEG C163 


G/S 











RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B8 WACY11 30€1046) O1-DEC-77 14:15 PAGE 142 


DZR6P8.P11 11-AUG-76 00:00 PRINT FIRST ERROR WORD TK BUFFER SEG C1E4 
6507 035456 004737 052144 JSR PC, PINOCT sCCHVERT TO CCTAL 
6508 035462 104401 001165 20$: TYPE @SCRLP sTYPE <CR><LFD 
6509 035466 012604 MoV (SP )4,R4 SRESTORE R4 
6510 035470 012603 nov (SP)¢,R3 SPESTORE P3 
6511 035472 012601 nov (SP)*,R1 JRESTORE PL 
6512 035474 012600 nov CSP )e,RO JRESTORE RO 
6513 035476 000207 RTS Pc SRETUPH 


4/3 











RE611/RK06 PERFORMANCE EXERCISER MAINDEC OZR6P-P 


OZR6PB.P11 


6514 
6515 
6516 
6517 
6518 
6519 
6520 
6521 
6522 
6523 
6524 
6525 
6526 
6527 
6528 
6529 
6530 
6531 
6532 
6533 
6534 
6535 
6536 
6537 
6538 
65 39 
6540 
6541 
6542 
6543 
6544 
6545 
6546 
6547 
6548 
6549 
6550 
6551 
6552 
6553 
6554 
6555 
6556 
6557 
6558 
6559 
6560 
6561 
6562 
6563 
6564 
6565 
6566 
6567 
6568 
6569 


035500 
035506 
035510 
035514 
035516 
035522 


035524 
035532 
035534 
035540 


035542 
035546 
035554 
035556 
035562 
035564 
035570 
035574 
035600 
035604 
035610 
035614 
035620 
035624 
035626 
035634 
035636 
035642 
035646 
035652 
035656 
035662 


035664 
035672 
035674 
035700 
035704 
035710 
035714 
035720 
035724 
035726 
035732 
035740 
035742 
035746 
035750 
035756 
035760 
035766 
035770 


11-AUG-76 00:00 


032765 
001466 
105765 
001003 
005265 
000426 


122765 
103403 
005265 
000417 


005265 
032777 
001011 
104401 
005046 
116516 
004737 
104401 
105037 
016546 
066516 
066516 
022665 
101417 
032777 
001013 
004737 
104401 
004737 
005037 
004737 
000207 


032777 
001002 
104401 
105037 
005065 
005065 
005065 
005037 
010446 
116504 
156437 
012604 
105765 
001025 
122765 
001410 
122765 
001013 
004037 


000001 
000147 
000176 


000020 
000172 


000174 
020000 


062543 


000006 
052144 
001165 
001640 
000176 
000172 
000174 
000100 


046020 


022316 
063040 
012716 
001562 
022016 


020000 
062750 
001640 
000146 
000150 
000212 
001562 


000000 
001510 


000210 
000117 
000140 
050706 


000150 


000147 


143364 


143304 


143246 


001507 


000001 
000001 


SUCCESSFUL PECOVEPY CLEAR UP 


MACY11 30€1046) O1-CEC-77 14315 PACE 143 


SEG O1€5 


eSBTTL SUCCESSFUL PECOVERY CLEAN UP 
#BITO,P.DSTTCRS) SCHECK IF DATA TYPE ERROR 


SURECY: BIT 
BEQ 
TSTB 
BWE 
rnc 
BR 


5$3 Cres 
BLO 
Inc 
BP 


6$3 IWC 
BIT 
BWE 
TYPE 
CLR 
Ove 
JSR 
TYPE 
9$: CLare 
MOV 
ADD 
ADD 
cup 
BLOS 
817 
BRE 
JSR 
TVPE 
JSK 
CUR 
JSR 
RTS 
10$: BIT 
BNE 
TYPE 
CURB 
CLR 
CLR 
CLR 
CLR 
“OV 
MOoVB 
BISsP 
MoV 
TSTB 
BWE 
CcuPe 
BEQ 
cree 
BWE 
JSR 


15$: 


10$ 3G, CLEAN UP FOR BEXT COPHARD 
P.RERO(RS) sCHECK TF FIBST EFRCR 

5$ 380, CHECK IF OFFSET 

P.SECC(RS) STUCKENENT BO. OF ECC RECOVERABLE ERRCAS 
9$ 260 CLEA UP PCR BEXT CONMARD 


#20,P.RERD(RS) 3CHECK IP OFFSET 


8S SYES, IBCREPENT CPFSET RECOVERABLE 
P.SRRDC(RS) STECREMEST PEKEAC RECOVERABLE 
9$ 3CO CLEAR UP FOR BEXT COWARD 
P.SOFFC(RS) STUCREMERT CEFSET RECOVERABLE 
@SW13,eSuF sCHECK If IWHIBIT PRINT OUT 
9$ sYES, CLEAR UP FOR REXT CONPARD 
cERR106 sTYPE “OFPSET® 
-(SP) sMAKE ROOW OB STACK 
P.CPST(RS),(SP) sSTCKE CEFSET FCR PRINT CUT 
PC,BINOCT sCORVERT TO OCTAL 
@SCRLP STYPE <CR><LF> 

RTYSCH SCLEAR SECTOR RETPY FLAC 


Po SECC(R5),-(SP) sSTCRE BUNBER CF ECC RECOVERABLE ERACRE 
P.SRRD(R5),(SP) ;ADD NUMBER CP PEREAD RECOVERABLE ERRORS 
P.SOFF(RS),(SP) 3ADD ROMBER CF CFFSET RECOVERABLE ERRCRE 
(SP)e,P.CERT(RS) sCHECK If SCPT ERRCR RATE EACESCES 

10$ 380, GO ISSUE BEXT COMMDED 


OSU4ISW14,0SUR ZCHECK IF IWHIBTT AUTOMATIC DPIVE DROPPIEC 
10$ sYES, GO ISSUE BERT COMPARD 

PC, BUPFREL 260 RELEASE BUFFER 

vERR205 sTYPE @FRROR THRESHOLD EXCEEDED" 

PC, DROP 260 CROP ORTVE 

ERRPRO sCLEAR ERROR CURRENTLY BETHC PROCESSED 
PC, CETBUF SCET BUFFER FCR KEXT COMMAND 

Pc sRETUPRD 

#S¥13,@SuR SCHECK YF INHIBIT PRINT OUT 

15$ sYES, CHECK IF READ PACK SERIAL BUMBER 
ERR 203 STYPE RECOVFEABLE ERROR 

RTYSCN sCLEAP SECTOR RETRY COURT 

P.RECTCRS) SCLEAR ERROR FLAGS AND RETRY COURTS 
P.DSTT(RS) 

P.ERR( RS) 

ERRPRO SCLEAR ERROP CUPKENTLY BEIEG PACCESSED 
R4,-(SP) sSTORE R4 OW STACK 

P.DORVN(RS),R4 SSTORE ORIVE FUPBER FOR INDEX 


INTMSF(R4),0.CVER ;ALLOW CVESLAPPED OPERATICNUS Ch THIS CHIVE 


(SP )o,R4 
P.ASSHC(RS) 
20 


16$ 


SRESTORE R4 
SCHECK TF If ASSICRPENT SEQUERCE 
sYES, TERMINATE SEQUENCE 


0$ 
#SEEK,P.CWND(RS) sCRECK IF SEEK TC PREVIOUS CYLIBTEP 


sYES, GO ISSUE RELEASE 


@PRELEAS,P.C¥HDC(RS) SCHECK IPF RELEASE 


17$ 
RO,Q.PUSH 


3NC, CARRY CUT NCRMAL RECOVERY 
SENQUEUE PARAMETER BLOCK Im DRIVE 


z/3 


a @ @ @® @ @ @® @® @® @ 





RF611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-B8 


DZR6PB.P11 


6570 
6571 
6572 
6573 
6574 
6575 
6576 
6577 
6578 
6579 
6580 
6581 
658? 
6583 
6584 
6585 
6586 
6587 
6588 
65869 
6590 
6591 
6592 
6593 
6594 
6595 
6596 
6597 
6598 
6599 
6600 
6601 
6602 
6603 
6604 
6605 
6606 
6607 
6608 


035774 
035776 


036000 
036006 
036012 
036014 


036016 


036022 
036030 
036032 


036036 
036044 
036046 
036052 
036060 
036066 
036074 
036102 
036110 
036116 
036122 
036124 


036126 
036132 


036136 
036142 
036146 


11-AUG-76 00:00 


001314 
000207 


112765 
004037 
001324 
000207 


000137 


132765 
001402 
000137 


032765 
001030 
105065 
116565 
052765 
016565 
016565 
016565 
016565 
(04037 
001324 
000207 


004737 
104401 


004737 
004737 
000207 


000140 
050706 


0242772 


000117 
013370 
002000 


000211 
000123 
000200 
000126 
000124 
000132 
000130 
050706 


022316 
055347 


012716 
022016 


000210 


000014 


000001 
000014 
000004 
000002 
000010 
000012 


MACY11 20€1046) O1-CEC-77 14315 PACE 144 


SUCCESSFUL RECOVERY CLEAN UP 


16$: 


1752 


ficial 


25$3 


30$3 


AVAILQ 
RTS 


MOvB 
JSR 
Crarra 
RTS 


JMP 
CHECK 


BITB 
BFQ 
JMP 
BIT 
BWE 
CLRB 
MOVB 
BIS 
MOV 
nov 
nov 
MoV 
JSR 
CInITe 
RTS 


JSR 
TYPE 


JSR 
JSR 
RTS 


3 AVAILIABLE QUEVE 


Pc sRETORG 
SRELEAS,P.CMBD(RS) ZISSUE RELEASE COMWARD 
RO,Q.PUSH SENQUEUF PARAPETER BLOCK IN COMMAND 
3 IBITIATICH QUEUE 
Pc sPETURE 
WOR*L SCAREY COT RCRHAL DATA TRANSFER TERPIWATICS 


If ANY OF TRE FOLLOWING ASSIGNMENT STIGES 


READ DRIVE STATUS 

START SPIWOLE 

SET VOLUME VALID 

RECAL 

READ PACK SERIAL HUMBER 
SBITOUBITIIBITZIGITIIOIT6,P.ASSR(RS) 


25$ 3NO, PROCESS WHITE PACK 

AsuorP sPROCESS PURMAL TERPINATION 
QDRPORY,P.PRSTC(RS) sCHECK IF CECP DFIVE 

30$ sYES, GO DROP DRIVE 

P.SEEK(RS) sCLEAR SEEK TO PREVIOUS LOCATION 


P.RCMD(RS),P.CHRD(RS) ZRETSSUE LAST WRITE/URITE CHECK CCRPARL 
@U.UCK,P.PRST(RS) ZSET ISSUE WHITE BEPORE BRITE CRECK 
P.RSEC(RS),P.SECT(RS) sLOAD PREVICUS TRACK AND SECTOR 
P.RCYL(RS),P.CYLHCRS) sLGAD PREVICUS CYLIBDER 
P.RBAL(RS),P.RPALGCRS) sLCAD PREVICUS BUS ADCHESS 
P.RUCCRS),P.UCCRS) ZLOAD PREVICUS WORD COUNT 


RO,Q.PUSH ZENQUEUE PARAPETER PLOCK IM COMPARD 
3 IBITIATION QUEUE 

Pc sPETORE 

PC, BUFREL 260 RELEASE BUFFER 

a OPROOS STYPE "CPERATCR INITIATED OROP DRIVE 
3 DURING PACK WKITING™ 

PC, DROP 260 DROP DRIVE 

PC, GETBUF SCET BUFFER FCR KEXT COPMARD 

Pc ZRETUPD 


SEG C166 


a/3 
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RK611/RKO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-B MACY11 30€1046) O1-DEC-77 14:15 PACE 145 


DZR6PB.P11 11-AUG-76 00:00 GET CURRENT STATUS INFORMATION S&C 0167 
6609 eSBTTL GET CURRENT STATUS INFORMATION 
6610 
6611 036150 010446 GETCUR: MOV R4,-(SP) sSTCKE F4 OR STACK 
6612 036152 010346 nov R3,-(SP) sSTORE ®3 ON STACK 
6613 036154 010504 MoV R5,R4 SLOAD START CF CURRENT PARRANETER BLOCK 
6614 036156 012703 004512 nov #PARM10,83 sLOSE START CF RETRY PAPAPETER BLCCE 
6615 
6616 036162 012423 $$: nov (R4 Deo, (R3 De sTOPY PARANTER BLCCK 
6617 036164 022703 004576 cue @PARM10¢P.EPAT¢2,R3 ;CHECK YF FIATSRED 
6618 036170 001374 BWE 58 200, GET WEYT WORD 
6619 036172 012603 nov (SP)¢,R3 sRESTORE R3 
6620 036174 012604 nov (SP )*,R4 sRESTORE R4 
6621 036176 000207 RTS pc sRETURS 
6622 : 
6623 eS8TTL RESTORE STATUS 
6624 
6625 036200 010446 RSTAT: MOV R4,-(SP) sSTCKE R4 ON STACK 
6626 036202 010346 MOV R3,-(SP) sSTORE R3 ON STACK 
6627 036204 010504 nov R5,R4 sLOAD START OF CURRFAT PARRAMETER BLOCK 
6628 036246 012703 004512 hOV @PAFM10,&3 SLCAC START CF RETKY PARAMETER PLCCE 
6629 
6630 036212 012324 S$: uor (R3 Do, (R4 DO sCOPY PARAMTER BLCCK 
6631 036214 022703 004576 CMP SPARM1O¢P.EPAT¢2,R3 CHECK TF FIRISRED 
6632 036220 001374 BRE 58 200, GET EXT BORT 
6633 036222 012603 Mov (SP)¢,R3 SRESTORE R3 
6634 036224 012604 Mov (SP)*,R4 SRESTORE R4 
6635 036226 000207 RTS pc sPETURD 


KL 








@ 
RK611/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-B MWACY11 30(€1046) 01-DEC-77 14315 PACE 146 | 
OZR6PB.P11 11-AUG-76 00:00 DETERMINE CFFSET FOR RETRY SEC GLE6 e 
6636 eSBTTL DETERMINE OFFSET FOR RETRY e 
6637 
6638 036230 122765 000021 000147 DETOFF: CrrR $21-P READS) CHECK YP CPESET = 4400 NICRO-INCPES | 
6639 036236 001004 BRE 10$ 3¥O, CONTINUE | 
6640 036240 112765 000020 000006 MOVs gorrrd,P.orstcas) gLCAD OFFSET VALUE = #400 NICRO-INCRES @ 
6641 036246 000447 BR 15$ 31SSOE CRFSFI 
6642 
6643 036250 122765 000024 000147 10$: cwes #24,P.RERD(RS)  ;CHECK IF OFFSET = -400 MICRO-INCRES @ 
6644 036256 001004 BNE 11$ 980, CONTINUE | 
6645 036260 112765 000220 000006 nove gorend,P.orst( as) 3LOAD OPFSET VALUE = -400 MICRO-INCRES 
6646 036266 000437 BR 15$ 3ISSUE OFFSET e@ 
6647 
6648 036270 122765 000027 000147 11S: cwes $27,P.RERD(RS) ;CHECK TF CPESET = 4800 MICRO-IRCFES | 
6649 036276 001004 BNE 12$ 380, CONTINUE 6 
6650 036300 112765 000040 000006 nove #OFPP®,P.OFST(RS) sLOCAD OFFSET VALUE = #600 MICRC-INCHES 
6651 036306 000427 BP 15$ ISSUE CEPSET e 
6652 
6653 036310 122765 000032 000147 12$: CMPB 632-P.nERD(RS) sCHECK IF OFFSET = -600 HICRO-INCRES 
6654 036316 001004 BRE 13$ 3NO, CONTINUE 
6655 036320 112765 000240 000006 nOVB @OFFMS,P.OFST(RS) ;LOAD OFFSET VALUE = -800 NICRO-INCHES @ 
6656 036326 000417 aR 15$ ISSUE OFFSET | 
6657 
6658 036330 12276© 000035 000147 13S: CvPR #35-P-RERDCRS) CHECK TF CPFSET = 61200 NICRO-IBCHES @ 
6659 036336 001004 BNE 14$ 3NO, CONTINUE | 
6660 036340 112765 000060 000006 MOVP gOPPPL2/P.0rst(RS) LOAD OFFSET VALUE = #1200 NICRO-INCRES 
6661 036346 000407 BP 15$ zISSUE CEFSET @ 
6662 
6663 036350 122765 000040 000147 14$: CMPR $40,P.RERD(RS)  ;CHECK IF OFFSET = -1200 MICRO-IBCHES 
6664 036356 001013 BNE 30$ 280, DO REREAD e@ 
6665 036360 112765 000260 000006 nOVR QOFPM12,P.CPSTC(CRS) ;LOAD OFFSET VALVE = -1200 NICEO-INCFES 
6666 036366 112765 000115 000001 15$: wove SOF PSET,P.CHND(RS) 3LOAD OFFSET COMMAND 
6667 036374 004037 050706 JSR RO, Q.PUSH JEBQUEUE PARAWETER BLOCK Tm CONPARD @ 
6668 036400 001324 CINIT@ 3 IDITIATICH QUEUE 
6669 036402 011000 nov (RO), RO LOAD OFFSET ISSUED RETURN 
6670 036404 000200 RTS RO #RETURD @ 
6671 
6672 036406 005720 30$: 1ST (RO)* ZACJUST GETURH PCR BC OFFSET 
6673 036410 000200 RTS RO > PETURS @ 
€ 
€ 
€ 
€ 
€ 
€ 
4/3 
é 





RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PB.P11 


6674 
6675 
6676 
6677 
6678 
6679 
6680 
6681 
6682 
6683 
6684 
0685 
6686 
6687 
6688 
6689 
6690 
6691 
6692 
6693 
6694 
6695 
6696 
6697 
6698 
6699 
6700 
6701 


036412 
036416 
036422 
036424 
036426 
036430 
036432 
036436 
036440 
036442 
036446 
036450 
036454 
036460 
036462 
036464 
036470 
036472 
036474 
036500 
036502 
036506 
036510 
036514 
036516 
036522 


11-AUG-76 00:00 


013746 
166516 
011646 
006316 
062616 
005046 
113716 
062616 
005046 
116516 
162616 
012746 
004737 
012616 
0050 46 
113716 
062616 
005046 
116516 
162616 
111666 
105016 
161637 
006316 
0(,2637 
000207 


001636 
000002 


001635 


000005 
000026 
054064 
001634 


000004 
000001 
001632 
001630 


MACY11 30€1046) O1-GFC-77 14:15 PACE 147 
CALCULATE RETRY WORD COUNT 


eSBTTL CALCULATE RETRY WORD COUNT 


CALUC: 


nov 
SUB 
nov 
ASL 
adD 
CLR 
nove 
adD 
CUR 
nOVB 
SUB 
nov 
JSR 
uov 
CLR 
uors 
a0D0 
CLR 
nove 
SUB 
nove 
CLRB 
SUB 
ASL 
ADD 
RTS 


RTYCYL,-(SP) 
P.CYLB(RS ),(SP) 


¢ 


SP),-(SP) 


(SP) 


if 


SP)e,(SP) 


-(SP) 
RTYTRE,( SP) 


& 


P.TRCK(RS),CSP) 


« 
L] 
P 


¢ 


SP)*,(SP) 
(sP) 


SP)¢,(SP) 
22-2~(SP) 
C,SHULT 

SP)*,(SP) 


-(SP) 
RTYSEC, (SP) 


C 


SP )*, (SP) 


-(SP) 


P.SECTCRS ),( SP) 


¢ 
C 


SP)*,(SP) 
SP),1(SP) 


(SP) 


£ 
¢ 
¢ 
P 


SP), PTYEC 
sP) 

SP )@,RTYBA 
c 


SSTORE PETRY CYLIRDER 
SSUBTRACT IWITIAG CYLINDER 
sSTORE CYLINDER OIFFPERERCE 
SMULTIPLY OTFFERERCE BY 2 
SMULTIPLY DIFPFERERCE BY 3 
SMARE ROCw OB STACK 

sCET RETRY TEACK 

380D RETRY TRACE 

SMARE ROOM OB TRE STACK 
dGET INITIAL TRACE 
SSUBTRACT IBITIAL TRACK 
SMULTIPLY TRACK BY 22 


STHRCW AWAY HOST SICHIFICANT BITS 

sPARE ROGH CH TRE STACK 

sCET RETRY SECTOR 

3ADD PRESENT SECTOR 

SMAKE ROCW OB STACK 

sCET IBITIAL SECTCR 

SCALCULATE BUMBER OCF SECTORS UNTIL ERFCE 
SMULTIPLY BY 256 WORDS/SECTOR 


SSUBTRACT FRC TRITIAL WORD COURT 
SDETERMINE RUPBER CF BYTES 
SCALCULATE STARTING BUFFER ADDRESS 
SRETORS 


SEG 01€9 


r 
G 





a @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @& @ @ @ @ 





RFE11/R°06 PERFORMANCE EXERCISER PATHDEC DZR6P-8 


OZR6PS.P11 


6702 
6703 
6704 
6705 
6706 
6707 
6708 
6709 
6710 
6711 
6712 
6713 
6714 
6715 
6716 
6717 
6718 
671° 
6720 
6721 
6722 
6723 
6724 
6725 
6726 
6727 
6728 
6729 
6730 
0731 
6732 
6733 
6734 
6735 
6736 
6737 


036524 
036530 
036534 
036542 
036544 
036546 
036550 
036554 
046560 
036564 
036572 
036574 
036600 
036664 
036610 
036614 
036620 
036624 
036630 
036634 
036640 
036646 
036650 
036654 
036660 
036662 


076664 
036670 
036672 
036700 
036704 
036710 
036712 


11-AUG-76 00:00 


012037 
004737 
032777 
001032 
104401 
000000 
104401 
004737 
004737 
022737 
001016 
104401 
016546 
004737 
104401 
016546 
004737 
104401 
004737 
005237 
022737 
103006 
104401 
104401 
000000 
000776 


105765 
100005 
042765 
005037 
004037 
001324 
000200 


036° 46 
027242 
026000 


001165 
025550 
027476 
062121 


062141 
000062 
052144 
057551 
000060 
052144 
001165 
030472 
001624 
000012 


057554 
060117? 


000150 


100200 
001562 
050706 


142376 


036546 


001624 


000150 


MACY11 30(€1046) O1-0FC-"7 14:15 PACE 148 


RECOVERABLE CONTROLLER ERROP TEPHTHATTC® 


-S8TTL 


283 


10$: 


1552 


20$: 


RECOVERABLE CONTRCLLEP ERPOR TEPHINATICN 
COWERR: HOV 


JSR 
817 
BWE 
TYPE 
-WOPD 
TVPF 
JSR 
JS 
cwe 
BYE 
TYPF 
nov 
JSR 
TYPE 
mov 
JSR 
TYPE 
JSR 
Inc 
cup 
BHIS 
TYPF 
TYPE 
HALT 
BR 


TST8 
BPL 
BIC 
CLR 
JSR 
Craite 
RTS 


CPO) e,2$ ZSTCKE FROCK PESSACE ADDUFSS 
PC,PRTO00 SPRIBTES FESLER 
$S013,6SuP SCHECK If LBHIBIT PRIFT OUT 
10$ sYES, CHECK IF HALT OF ERRGP 
STYPE ERRCR PESSACE 
0 
a SCRLF STYPE <CH><LF> 
PC, PRISTT SPRIBT CORMTROLLER RECTSTERS 
PC, PRTO02 SPRIAT CURKFAT EXECUTED COMPARD 
#ER°066,2$ sCHECK TF ECC LOGIC ERRCR 
10$ 3"O, CHECK TF HALT Ch ERROR 
7 ERROG7 STYPE "RRECPT RFECPS® 
PoEPATCRS),-(SP) 3STCRE ECC FATTEFN FOR PRINT COT 
PC, BINOCT SCONVERT TO OCTAL 
7 SLANKs sTYPE 2 SPACES 
P.EPOS(PS),-(SP) ¢STCPE ECC PCSITION FOR PRINT CUT 
PC,PINOCT sCCHVERT TO CCTAL 
7SCPRLF STYPE <CRO<CLFD 
PC, HLTOOO0 sCHECK ITF HALT OW ERKOR 
CNTCNT STNCREMERT CCPIRCLLER EPROR COURT 
@T.COWT,CRICNT ;CHECK TF THRESACLO EXCEEDEC 
iss 380, CONTINUE 
a ERROOO sTYPE “FATAL ERRCR® 
aERROO8 STYPE “CONTRCLLER ERROR THRESHOLD EXCEECET® 
222 
P.DSTTC(RS) sCHECK TF FIRST EPRCR 
20$ sNC, PEGUEUF CCPRANC 
SBITASIBIT7,P.OSTTCRS) sCLEAR ERFCR ENQUEVED ANC PIRST ERFCE 
ERRPRO sCLEAR ERROR PETNC PROCESSED 
RO,Q.PUSK SPEQUEUE COPPAND ITN COMPARD 
3 IBITIATICH GUECE 
RO sPETUPH 


SEC Ci7G 


Aly 


RE611/RKO6 PERFORMANCE EXERCISER MATHDEC DZR6P-8 


D7R6PB.P11 


6738 
6739 
6740 
6741 
674? 
6743 
6744 
6745 
6746 
6747 
6748 
6749 
6750 
6751 
6752 
6753 
6754 
6755 
6756 
6757 
6758 
6759 
6760 
6761 
6762 
6763 
6764 
6765 
6766 
6767 
6768 
6769 
6770 
6771 
6772 
6773 
6774 
6775 
6776 
6777 
6778 
6779 
6780 
6761 
6782 
6783 
6784 
6785 
6786 
6787 
6768 
6789 
6790 
6791 
679? 
6793 


036714 
036722 


036724 
036732 


036734 
036742 


036744 


036752 
036754 
036756 


036760 
036764 
036772 
036774 
037000 


037002 
037006 


037010 
037014 
037022 
037024 
037030 


037032 
037040 
037042 
037046 


037050 
037056 
037060 


11-AUG-76 00:00 


032765 
001016 


032765 
001026 


032765 
001072 


032765 


001116 
005720 
000200 


004737 
032765 
001403 
104401 
00047? 


104401 
000467 


004737 
032765 
001403 
104401 
000456 


032765 
001403 
104401 
000447 


032765 
001402 
104401 


046064 


006010 


004070 


027242 
000010 


061074 
061103 
02724? 
040000 
061613 


000040 
061116 


000020 
061133 


000212 


000014 


000036 


000034 


000034 


000034 


TSTDRP: BIT 


=e Ge Se Ne ‘Se Se Ge Ge Se Se Ge 


Se Se Ne Ne Se 


10$: 


11$: 


1252 


1252 


1452 


MACY11 30€1046) O1-CFC-77 14315 PACE 149 
TEST FOR DROP DRIVE ERRORS 


eSBTTL TEST FOR DROP DRIVE ERRORS 


@ACLONMSPOLSS,P.DS(RS) sCHECR Tf AC LOW OR SPEED LCSS 


10$ 


sYES REPORT ERROR 


CHECK IF ANY OF TRE FOLLOWING ERRORS ARE SET 


BIT 
BWE 


ILLEGAL DISK ADDRESS 


WRITE LOCK ERROR 
ORIVE TYPE ERROR 


FORPAT ERRCR 


BON-EXECUTABLE DRIVE FUNCTION 
SUNSITDAENULETOTYE IFMTE INF, P.ER(RS) 


12$ 


sYES, GFPORT ERRCE 


CHECK IF ANY OF TRE FOLLOWING FLAGS APE SET 

DRIVE ERROR NOT REPORTED 

DRIVE READY BOT SET AFTER START SFINOLE 
VOLUME VALID SOT SET APTEP PACK ACKNOWLEDCE 
@BITIIBITIOIBIT1I1,P .ERRCRS) 


BIT 
BRE 


18$ 


SYES, GC REPCRT EFRCR 


CHECK IF ANY OF TRE FOLLOWING FLAGS ARE SET 


BIT 


BWE 
TST 
RTS 


JSR 
BIT 
BEG 
TYPE 
BP 


TYPE 
BP 


JSR 
BIT 
BEQ 
TYPE 
BR 


BIT 
BEQ 
TYPE 
BR 


BIT 
BEQ 
TYPE 


DRIVE STATUS CHANCE CID BOT CLEAS 
UNEXPECTED ATTH FROM DRIVE COPMARD 
ATTENTION SET BUT DSC AND FAULT RESET 
GORVHRDIDRVDSC IUEXATIINCOSC,F .ERST( FS) 


32$ 
CRO) 
RO 


PC, PRIOOO 
@ACLO,P.0S(RS) 


PC, PRTO000 
#UNS,P.ERC RS) 


#PMTE,P.ERC(RS ) 
15$ 
7 EKRO36 


sYES REPORT ERROR 
dGET WORMAL RETORE ADDRESS 
ZPETUPD 


SPRINT ERROR READER 

sCHECK TF ac LOW 

200, CONTINUE 

sTYPE “AC LCe® 

260 GET ERROR QUALIFICATION 


sTYPE “SPEED LCSS* 
sGET ERPOP QUALIFICATION 


sPRIBT ERROR HEADER 
sCHFCK TF OFIVE UNSAFE 
3NO, CONTINUE 

sTYPE "DRIVE ONSAPE* 
SCET ERRCR QUALIFICATION 


sCHECK TF DPIVE TYPE ERFOR 
sO, CORTINUE 

STYPE “ORTVE TYPE EPROR® 
sCET FRRGCR CUALTF IEF BITS 


sCHECK TF FORMA? ERROR 
3NO, COWTINOE 
3TYPE FORMAT PRECE 





se¢ 6171 


B/F 








: 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PB.P11 


6794 
6795 
6796 
6797 
6798 
6799 
600 
6801 
6802 
6803 
6804 
6805 
6806 
6807 
6808 
6809 
6810 
6811 
6#12 
6813 
6814 
6815 
6816 
6817 
6818 
6819 
6820 
6821 
6822 
6823 
6824 
6825 
6826 
6827 
6828 
6829 
6830 
6931 
683? 
6833 
6234 
6835 
6836 
6837 
683A 
6839 
6840 
6841 
684? 
6843 
6844 
6845 
6846 
6847 
6948 
6849 


037064 


037066 
037074 
037076 
037102 


037104 
037112 
037114 
037120 


037122 
037126 


037130 
037134 
037142 
037144 
037150 


037152 


037160 
077162 


037166 
037172 
037200 
037202 
037206 


037210 
037214 
037222 
037224 
037230 


037236 
037240 
037244 


037252 
037254 
037260 


037266 
037270 
037274 
037300 
037306 
037310 
037714 
037316 
037322 
037326 


11-AUG-76 00:00 


000440 


032765 
001403 
104401 
000431 


032765 
001403 
104401 
00042? 


104401 
000417 


004737 
032765 
001402 
104401 
000406 


032765 


001404 
104401 


104401 
032765 
001405 
104401 
000402 


004737 
032765 
001402 
104401 
032765 


00140? 
104401 
032765 


001402 
104401 
032765 


001402 
104401 
005265 
032777 
001015 
005765 
100402 
104401 
004737 
004737 


000004 
061146 


002000 
061043 


061057 
027242 


002000 
061505 


004000 


061546 


001165 
000010 


061626 
027242 
000020 
060744 
004000 


061667 
000040 


060763 
000010 


061023 
000206 
020000 


000150 
062712 


025550 
025374 


000034 


000034 


000212 


000212 


000212 


000014 


000014 


000014 


000014 


141632 
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TEST FOR DROP OPIVE EPRORS 


15$: 


16$: 


17$: 


18$: 


19$: 


30$: 
31$: 


2252 


42$: 


43$% 


44S: 


45$: 


46$: 


51$: 


BIT 
BEG 
TYPE 
BR 


BIT 
BEG 
TYPE 
BP 


TYPE 
BR 


JSR 
BIT 
BEQ 
TYPF 
BR 


BIT 


BFQ 
TYPE 


TYPE 
BIT 
BEG 
TYPE 
BR 


JSE 
BIT 
BFQ 
TYPE 
BIT 


BEQ 
TYPE 
BIT 


BEQ 
TYPF 
BIT 


BEG 
TYPE 
IWC 
BIT 
BNE 
TST 
BYI 
TYPE 
JSR 
JSR 


30$ sGET ERPOP GUAILIPER BITS 

@RXP,P.ERCRS) SCHECK TF BOCR-EXECUTABLE DATVE FUBCTICH 

16$ sO, CONTINUE 

7 ERPO37 sTYPE ILLEGAL DRIVE FUNCTICE 

30$ sCET ERROR QUALIFIER BITS 

@TDAE,P.ER( PS) s;CHECK TF ILLEGAL DISK ADDKESS 

17$ 200, CONTINUE 

wERRO31 STYPE “ILLECAL DISK ADDRESS" 

30$ SCET ERROP CUALTFER BITS 

aERRO32 sTYPE “WRITE LOCK EPROR® 

30$ SGCET ERRCR QUALIFIER BITS 

PC,PRIOOG SPRINT ERROR READER 

SPIT1LO,P.ERR(RS) sCRECK IF DRTVE BOT READY APTER START SFIBCLE 
19$ 3NO, CONTIBUE 

zERROS3¢1 SPRINT “ORIVE BOT READY APTER START SPINCLE* 
30$ SCET ERROR QUALIFIER SITS 


@BIT11,P.ERR(RS) sCHECK If YVCLUPE WALTD DIC BCT SET 
3 «AFTER PACK ACKROWLEDGE 


31$ sO, CONTINUE 
a ERPOS441 SPRIBT “VOLUME VAID NOT SET AFTER 

3 PACK ACKNCWLEDGE INDSTRUCTICR® 
a SCRLF sTYPE <CR><LFD> 
SBIT3,P.ERPR(RS) sCHECK TF ERROR KOT INDICATED BY FAULT 
42$ sUC, CHECK CTIRER CUALIFIER PITS 
aERROS7 sTYPE “ERROP BOT INDICATED BY FAULT® 
42$ sCHECK OTHER QUALIFIER BITS 
PC,PRIO00 SPRIAT ERRCE REACER 
@ORVHRD,P.PRST(RS) 3CHECK IF RAPD DRIVE ERRCR 
43$ 3¥G, CHECK CTRER QUALIFIER PITS 
@ERRO27 STYPE “DRIVE RARD ERECR® 


#RODSC,P.PRSTCRS) sCHECE IF ATTENTICH BUT 
3 WC DRIVE STATUS CHANGE OR FAULT 


44$ 3¥O, CHECK CTREF CUALTFIER PITS 
7ERROSS sTYPE “ATTH BUT AC CSC CR FRULT® 
#ORVOSC,P.PRST(RS) sCHECK IP DRIVE STATUS CRANGE CID 
3 WCT CLEAP 
4s$ sNC, CHECK CTHE® ERFCR CGUALTFIER PITS 
7 ERRO2S sTYPE "DRIVE STATUS CHANGE CIT BCT CLEAF® 


SUEXATT,P.PRST(RS) 3CHECK IF ONEXPECTED ATTENTION FROY 
3 DIVE CCPPARD 


46$ 3"O, CHECK CTHER CUALTFIEP BITS 

7ERRO30 STYPE “UNEXPECTED ATTN FROM DRIVE COMPARC® 
P.WER(RS) STACKEMENT CTHER ERROR COUNT 

#S¥13,@SuF SCHFCK TF INHIBIT PRINT OUT 

60$ sYES, CHECK IF RALT ON ERPOF 

P.DSTT(R5) sCHECK Tf ERROR DURING ERROR RECCVERY 

518 200, PRINT STATUS 

aERP202 sTYPE “ERROR DURING ERRCR RECOVERY" 

PC, PRISTT SPRINT CONTROLLER REGISTERS 

PC, PRDSTT SPRIAT DRIVE STATUS 


SEG 0172 


ClY 








q 

RE611/RF06 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 36(1046) O1-DEC-77 14:15 PAGE 151 

DZR6PB.P11 11-AUG-76 00:00 TEST FOR DROP ORIVE ERRORS sac 0172 ( 
6850 037332 004737 027476 JSR PC, PRIO02 PRINT COPRERT CCPMARD 
6851 037336 004737 027320 JSR PC,PRIOOL PRINT PREVICUS CCHPAND ( 
6952 037342 004737 030472 60$: JSR PC, HLTO00 CHECK TF WALT OW ERROR 
6853 037346 032777 000100 141564 BIT #Sw6,@SuR CHECK FOR SbITCH 6 
6854 037354 001431 BEG 63$ 3¥C CRCP DRIVE ( 
6855 037356 032765 000030 000036 BIT @ACLOUSPOLSS,P.DS( RS) 3CHECK If UNSAFE, ACLOW AWC SPEFD LCSS 
6856 037364 001004 BRE 61$ 
6857 037366 032765 040000 000034 BIT g0UNS,P.ERCRS) J 
6858 037374 001421 BEG 63$ 
6859 037376 105765 000120 61$: TSTR P.TERC(RS) CHECK IF INHIBIT ERROR RECCVERY 
6860 037402 001012 BNE 62$ ( 
6861 037404 105265 000146 IRCP P.RECTC(RS) sINCKEMERT ERPCR BETKY COURT 
6862 037410 122765 000010 000146 cues @8.,P.RECT(PS)  ;CHECK If RETPY TARESHOLD EXCEEDET 
6963 037416 103404 BLO 62$ VES, INDICATE ONSUCCESSFUL RECOVERY 4 
6864 037420 004037 050706 JSR RO,Q.PUSH PEMQUEUE PAPAPETER PLOCR Th CCHPARD 
6865 037424 001324 CIMITQ 3 IwITTATION GUEVE 
2 037426 000402 BR 57$ sPETURN . ( 
686 
6868 037430 004737 030724 62$: JSR PC, UNRECY ZINDICATE UNSUCCESSFUL RECCVERY 
6869 037434 011000 57$3 MoV (RO),RO ( 
6870 037436 000200 RTS RO 
6871 
6872 037440 004737 022316 63$: JSK PC, PUPRFL RELEASE RUPEFS . { 
6873 037444 004737 012716 JSR Pc, DROP DROP OPIVE 
6974 037450 004737 022016 JSR PC,GETBUF 3CET NEW BUFFER 
6875 037454 005037 001562 CLR ERRPRO 3CLFAR ERROR RETIEC PROCESSED ( 
6876 037460 011000 wov CRG) ,RO LOAD ERROR RFTOSN 
6877 037462 000200 RTS RO PETUCH 





> > => -> - 


=~ =. as, _ & 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZRG6P-8 


OZR6PB.P11 


6878 
6879 
6660 
6961 
6862 
6883 
6684 
6885 
68686 
6887 
6e6A 
6e89 
6890 
6891 
6892 
6893 
6894 
6895 
6996 
6897 
6898 
6899 
6900 
6901 
6902 
6903 
6904 
6905 
6906 
6907 
6908 
6909 
6910 
6911 
6912 
6913 
6914 
6915 
6916 
6917 
6918 
6919 
6920 
6921 
6922 
6923 
6924 
6925 
6926 
6927 
6928 
6929 
6930 
6931 
6932 
6933 


037464 
037472 
037474 
037502 
037510 
037516 
037*22 
037524 


037526 
037534 
037536 
037544 
037550 
037552 
037556 


037560 
037566 
037570 
037576 
037604 
037610 
037612 


037614 
037622 
037624 
037632 
037640 
037642 
037650 
037652 
037660 
037662 
037670 
037672 
037700 
037702 
037710 
037712 
037716 
037724 
037732 
037734 
037742 
037746 
037750 


037752 
037760 


037762 
037770 


11-AUG-76 00:00 


032765 
001415 
042765 
052765 
112765 
004037 
001324 
000207 


032765 
001427 
042765 
105765 
001403 
004737 
000207 


122765 
101053 
052765 
112765 
004037 
001324 
000207 


032765 
001453 
042765 
122765 
001424 
122765 
001420 
122765 
001414 
172765 
001410 
122765 
001404 
122765 
001002 
105265 
116565 
122765 
001003 
052765 
004037 
001324 
000207 


032765 
001436 


042765 
113765 


004000 
004000 
010000 


000117 
050706 


010000 


010000 
000211 


035500 


000021 
020000 


000115 
050706 


020000 
000021 


000024 
000027 
000032 
000035 
000040 
000147 
000123 
000131 


000700 
050706 


000100 


000100 
001662 


000150 
000150 


000150 
000001 


000150 
000150 


000147 


000150 
000001 


000150 


000150 
000147 


000147 
000147 
000147 
000147 
000147 
000001 
000001 
000014 


000150 


000150 
000001 
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ERROR RECOVERY SEQUENCE BORMAL RETURN 


eSBTTL ERROR RECOVERY SEGUENCE BORMAL PETUPR 


ERCV¥1: BIT 
BFQ 
BIC 

15$: BIS 
nova 
JSR 
crutro 
RTS 


EC3S3 BIT 
BEG 
BIC 
TSTPe 
BEQ 
JSK 
RTS 


S$: C¥PR 
BHI 
BIS 
MOVR 
JSR 
Cratta 
RTS 


10$: BIT 
BEQ 
BIC 
crPre 
BEG 
Crepe 
BEQ 
cupn 
BEG 
CMPR 
BEG 
cree 
BFEQ 
cvPpe 
BWE 
15$: Inca 
2052 nove 
CrPpR 
BWE 
BIS 
25$: JSK 
CrIwImTe 
RTS 


Ec4s: BIT 
BEQ 


BIC 
move 


#BITL1,P.CSTICRS) JCHECK IF RECALIBPATE ISSUED 
EC3$ 3¥0, CONTIBUE 
GPITLIIZP.DSTTCRS) ZsCLEAP RECALIPRATE ISSUEC 
@BIT12,P.DSTTCRS) 2SET SEEK ISSUET 
@SEEK,P.CPBD(RS) SISSUE SEEX TASTRUCTION 


R0,0.PUSH dPUT PAPAPETER BLCCR IN CONPARD 
3 IRITITATICKH GUEUVE 
Pc sPETOPE 


@BITI7,P.DSTTCRS) sCHECK TF SEER ISSUED 
10$ 3¥O, CCHTINVE 
#BIT1I2,P.DSTTCRS) ZCLEAP SEEK ISSUED 


P.SEEK(RS) sCHECK If SEE® TO PREVIOUS POSITICE 
5$ 380, PROCESS CATA TRANSFER 

PC, SURECY STNDICATE SUCCESSFUL RECCVERY 

ec sPETURE 


821,P.RERDCRS) JZCHECK IF OFFSET 
20$ 3NC, PETSSUF CCPP ARC 
#BIT13,P.DSTTCRS) ZSET OFFSET ISSUED 
@OFFSET,P.C4YNDCRS) ZsISSUE OFFSET 


RO,0.PUSH sPUT PARAPETEP BLCCF IB COMPARD 
3 ISTTIATION GUEVE 

Pc sRETURD 

@BITL3I,P.CSTT(C RE) sCHFCR TF CC PREVICUS CFFSET 

Ec4s 30, CONTINUE 


SBITLI3,P.DSTT(RS) sCLEAR OFFSET ISSUED 
#21,P.RERD(RPS)  sCHECK IF OFFSET #400 MICRO-INCRES 
15$ sVES, GC ISSUE PEAD 

#24,P.REKDCRS)  sCHECK IF OFFSET -400 MICRO-INCHES 
15$ sYES, GO ISSUE PEID 

#27,P.RERDCR5)  ;CHECK TF CRFSET «8CO MICPC-IRCHES 
15$ sVES, GC ISSUE READ 

#32,P.RERD(RS) jsCHECK TF GFFSET -600 MICROG-INCRES 
15$ sYES, GC ISSUE FEAD 

#35,P-RERD(RS) jsCHECE TF OFFSET #1200 PICRC-INCHES 
15$ sVES, GO ISSUF READ 

#40,P.RERDCPS) sCHECK IF CRESET -1200 PICKC-INCHES 
20$ 380, DO MCT INCREMENT REREAC COURT 
P.RERD(RS) STACREMPUT REREAD COUNT 
P.RCMD(PS),P.CHRDCR®) sLOAD COMPARD 
@URTCHK,P.C¥ND(RS) CHECK IPF WRITE CHECK 


25$ 30, ISSUE CCPMAND 
QW. UCK,P.PRST(RS) ZYES, ISSUE BRITE BEFCR WRITE CRECK 
f0,0.PUSH SPACUFUE PAPAPETER PLOCK ITM CCHPARD 
3 IRITIATION GUEVE 
Pc sPETURN 


@PIT6,P.0STT(RS) sCHECK IF WAITING POR PEAD STATUS 
3 FOR POSITICNING TIME CUT 

Ecss 3¥O, CONTINUE 

@BIT6,P.DSTT(PS) sCLEAR WAITING FCR READ STATUS 

POSCMD,P.CHND( RS) Z;RESTCKE CCPPARC CF ERRCE 


SEC 0174 


ElY 











RK611/R06 PERFORMANCE EXERCISER MATNDEC DZR6P-P 


DZR6PR.P11 


6934 
6935 
6936 
6937 
693" 
6939 
6940 
6941 
6942 
6943 
6944 
69456 
6946 
6947 
694" 
6949 
6950 
6951 
695? 
6953 
6954 
6°55 
6956 
6957 
6959 
6959 
6°60 
6961 
6962 
6963 
6964 
6965 
6966 
6967 
6968 
6969 
6970 
6971 
6972 
6973 
6974 
6975 
6976 
6977 
6978 
6979 
6980 
6981 
698? 
6983 
6984 
6985 
6986 
6987 
698" 
69869 


037776 
040004 
040006 
040012 
040014 


040016 
040022 
040024 
040030 
040032 
040040 
040046 
040052 
040054 


040056 
040064 
040066 


040072 
040100 
040102 
040106 
040112 
040114 
040116 
040120 
040122 
040124 
040130 
046132 
040134 
040140 
040142 
040144 
040146 
040150 
040152 


040154 
040156 
040160 
040162 
040164 
040166 
040172 
040176 
040202 
040206 
040210 
040714 
040220 
040224 
040230 
040234 


11-AUG-76 00:00 


032765 
001004 
004037 
061426 
000207 


004037 
061426 
004037 
040014 
052765 
112765 
004037 
001324 
000207 


032765 
001002 
000137 


042765 
010346 
016546 
042716 
006216 
006216 
006216 
006216 
00504€ 
116516 
162616 
100410 
012703 
006316 
011646 
006316 
062€1€ 
162602 
000407 


00541€ 
006316 
011603 
006316 
06260? 
062703 
012337 
012337 
011337 
012603 
004737 
013746 
043716 
013746 
043716 
052616 


000200 
027716 


070076 
030522 
004000 


000113 
050706 


000020 
040602 
000020 


000056 
177017 


000004 


065174 


064770 
001642 
001644 
001646 


036200 
001642 
001644 
001644 
001642 


000150 
000001 


000150 


000150 


58 


10$: 


EcSs$ss 


BIT 
BWE 
JSR 


MACY11 30(1046) O1-OC°C-77 14215 PACE 153 
ERROR RECOVERY SEQUENCE WCRWAL PETURD 


sORDY,P.0S(RS) 


10$ 
RO, PRI100 


Pc 
RO, PRI 200 
RO, WERSTT 


sCHECK TR DPIVE REATY 
sYES, REISSUE COMPARD 


SPRIGT ORTVE TIPE CUT DURTHC POSITIONTEC 


3 AnD ORCP CRIVE 
;PETURD 


sPRIGT ORIVE TIME CUT DURTAC 
3 PCSITICHTAC 

STAFE OTHER EPROR STATICS 
3¥O RECOVERY PETURN 


#BITL1I,P.DSTTC(RS) JSET RECALIBRATE TSSUFD 
GRECAL,P.CHRD(CE"®) ZISSUF PECALIPRATE 


k0,0.PUSH 
Pc 


SENQUEUE PARAMETER BLOCK IN COMPARE 
3 TMITIATION QUEUE 
sPETURE 


ala mia tee SCHECK IP HEDDER ERROR 


ces 


sYES, GO PROCESS FRRUP 
30, CORTINUE 


@BIT4,P.OSTTCPS) sCLEAR READ ALL PEADERS ISSUED 


R3,-(SP) 


sSTORE R3 OW THE STACK 


P.BII(RE),-(SP) JSTORE SECTCKH Seat 
O°CCM.SECT>,(SP) sKEEP ONLY SECTCP COUNT 


(sP) 
(sP) 
(SP) 
(SP) 
-(SP) 


P.SECT(RP5), (SP) 


(SP)*,(SP) 


2$ 
SBUPADD-€,k3 
(SP) 
(SP),-CSP) 
(sP) 
(SP de, (SP) 
(SP )¢,a? 

3$ 


(SP ) 

(SP) 
(SP),F3 
(SP) 

(SP )*,R3 
#sHDPUFF-6,53 
(®3)¢,HEADI 
(R3)e,HFAD2 
(PR3),HEAD? 
(SP)¢,R3 
PC,RSTAT 
HEADN1L,-(SP) 
HFAD2,( SP) 
HEAC2,-( SP) 
HFAD1,(SP) 
(SP)¢,(SP) 


sSHIFT 4 BITS KICHT 


3GET SECTOR CCURT 

SPAKE ROOW OW TRE STACK 

JCET DESIRED SECICR 

sCALCULATE CIFFEREACE 

ZPRARCH IF TH LOSER PART CF BOUFFEF 
sLOAD BASE OF HIGRER PAPT OF PUFFFE 
SPULTTPLY SECTCR COUNT BY 6 


sCALCULATE HEADER ACDRESS 
sCHFC® HEACES 


sVAFE COURT POSITIVE 
SMULTTPLY DIFFERERCE RY 6 


sCALCULATF PESCES ACDPRESS 
sGET PIPST WCRD CF READER 
sCET SECOND UCRO CF HEADER 
sCET THIRD WCRC CF PEADER 
SPESTCHF R3 

SPESIORE STATUS 

sSTOKE FIPST WORD CF THE HEADER 
3PC1 & *HDZ 

ZSTOKE SECOND WCKE CF HEADEF 
3°HD1 & HDZ 

SCENEPATE EVEFCTELC PEADFR VEC 


S&C Oi7s 


Ey 





O_9 @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ ao am mn mm J 


RK611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PH.P11 


6990 
6991 
699? 
6993 
6994 
6995 
6996 
6997 
6998 
6999 
7000 
7001 
1002 
1003 
1004 
7005 
7006 
7007 
7009 
7009 
7010 
7011 
7012 
7013 
7014 
7015 
7016 
7017 
7018 
7019 
7020 
7021 
7022 
7023 
7024 
7025 
71026 
7027 
7028 
7029 
71030 
7031 
7032 
1033 
7034 
7035 
1036 
1037 
1038 
7039 
7040 
7041 
1042 
1043 
71044 
71045 


040236 
040242 
040244 
040250 
040252 
040256 
040260 
040264 
040272 
040274 
040302 
040304 
040312 
040314 
040320 


040322 
040330 
040332 
040334 
040340 
040346 
040350 
040354 
040356 
040364 
040372 
040400 
040406 
040414 
040420 
040426 
049430 
040436 
040442 
040444 


040446 
040454 
040456 
040462 
040464 
040470 
040472 
040500 
040506 
040512 
040514 


040516 
040520 
040526 
040530 
040532 
040534 
040540 


11-AUG-76 


023726 
001501 
004037 
061253 
105765 
001016 
105265 
122765 
101410 
122765 
001407 
122765 
101021 
004737 
000207 


122765 
001007 
010446 
116504 
146437 
012604 
004037 
040444 
116565 
013765 
013765 
013765 
013765 
005465 
122765 
001003 
052765 
004037 
001324 
000207 


023765 
001420 
004037 
062066 
004037 
040514 
052765 
112765 
004037 
001324 
000207 


005046 
113766 
006716 
006216 
006216 
153716 
052716 


00:00 

001646 
030076 
000120 


000147 
000043 


000121 
000021 


030724 
000021 
000000 
001510 
036230 
000122 
001636 
001634 
001630 
00163? 
000012 
000131 


000200 
050706 


001642 
030076 
030570 
004000 


000113 
050706 


001635 


001634 
140000 


000147 
000123 
000147 


000147 


001507 


000001 
000002 
000004 
000010 
00001? 
000001 


000014 


000030 


000150 
000001 


000091 


MACYL1 30(1046) O1-CEC-77 14215 PAGE 154 


ERROR RECOVERY SEQUENCE HORWAL RETURE 


7$3 
8S: 


10$: 
12$: 
15$: 


1752 
2052 


cup 
BEQ 
JSR 
EPRO43 
TSTB 
BRE 
Ince 
cues 
BLOS 
CuPB 
BEG 
CuPB 
BAI 
JSR 
RTS 


CMuPR 
BWE 
mov 
nove 
BICB 
mov 
JSR 
12$ 
MOVB 
mCV 
MOV 
MoV 
MOV 
WEG 
CMPB 
BWE 
BIS 
JSE 
crurro 
RTS 


cwP 
BEQ 
JSR 
EPRO64 
JSR 


sCHECF TF HEADER WRC IS CORRECT 
3¥O, CONTINUE 
RO, PRT 200 SPRIBT READER VRC ERROR 


HEAD3,(SP)¢ 
15$ 


P.TERCC RS) sCHECK TF INHIBIT ERROR RECOVERY 
58 sYES, INDICATE UNSUCCESSFUL RECOVERY 
P.RERDC(RS) STUCREMERT PEREAC CCURT 


— —— SCHECR IF URRECOCVERSBLE 
sYES, INDICATE USRECOVERAPLE ERRCEH 

SPDDATA,P.RCHOCES) sCHECK IP READ DATA COMMARD 

6$ SYES, START ERECKH RECOVERY 
#21,P-RERDC RS) Z;CHECK IF UNRECOVERSBLE WRITE 
88 200, START ERROR FECOVERY 
PC, UNRECY STMDICATE UNGECOVERABLE EPRCR 
ec sPETUPE 


@21,P.RERD(RS) ZCHECK ITF BECIARING OFPFSETTING OPERATION 
7$ 3¥O, DETERMIBE PRCPER OFFSET 
R4,-(SP) sSTCKhE #4 CH THE STACK 
P.DRVNCRS),P4 ZCET DRIVE BUPBER FOR INDEX 
IRTYSK(R4),0.0VER 300 BOT DO IMPLIED SEEKS 
(SP) ¢,R4 SRESTCHE R4 
RO, DETOFF SDETERMNIBE OFFSET VALUE 
JOFFSFET ISSUED RETURN 
P.RCMD(RS),P.CHBDC(RS) ZSTORE COMMAND 
RTYCYL,P.CYLEC(RS) ZCET CYLINCES 
RTYSEC,P.SECT(RS) sCET TRACK BUD SECTOR 
RTYBA,P.BALO(RS) 26ET BUS ADDRESS 
RTYUC,P.WCCRS) 3CET BORD COURT 


P.WCC(RS) SMAKE IT POSITIVE 

@URTCHK,P.CMND(RS) SCHECK IF WRITE CHECK COMMAND 

10$ 380, CO ISSUE CCHPARD 

@U.WCK,P.PRST(RS) ZISSUE WRITE PEFORE BRITE CHECK 

RO,0.PUSh SFRQLEUE PAPAPETE® PLCCK Ch CCHPAED 
3 IWITIATICN QUEUE 

PC sPETURN 

HEADL,P.DCYL(RS) sCHECK If CYLINCFR CORRECT 

20$ sYES, CRECK SECTOP TRACK ANE FORRST 

RO, PRI 200 sPRIGT PISPOSITIORING 

RO, OPISTT 260 TAKE STATISTICS 


SUNRECOVERARLE ERROR RETURN 
@BIT11,P.0STTC(RS) sSET PECALIBRATE TSSUED 
@RECAL,P.CRPNDCR®) ZTSSUE PECALIPRATE 


RO,Q.PUSH ZENQUEVE PARAPETEP BLOCK IN 
3 COMMAND THITIATION QUEVE 
PC sPETURN 
-(SP) sMAFE ROOM OK STACK 
RTYTRK,Z1 (SP) sCET TRACE 
(SP) SSHIFT PICHT 3 BITS 
(SP) 
(SP) 
RTYSEC, (SP) SCENERATE EVPECTEL SECOND WCRO 


#140000,(SP) sPUT TH GC TRACK BITS 


SEG C176 


oly 
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RE6G11/RKOG PERFORMAWCE EXERCISER MATROEC DZR6P-B MACYL1 30(1046) O1-CEC-77 14315 PACE 155 
DZR6PR.P11 11-AUG-76 00:00 ERROR RECOVERY SEQUENCE BORMAL RETURS sec 0177 
7046 040544 022637 001644 cre (SP) ¢,HEAD2 gCHECK TP SECCAD WCRD If CORRECT 
7047 040550 001407 BEG 25$ sCHECK FOR BAD SECTOR 
7048 040552 004037 030076 JSR RO, PRI200 sTUDICATE OPERATION INCOMPLETE 
7049 040556 0612734 EPRO42 
7050 040560 004037 030570 JSK RO, OPISTT 3CC TOKE STATISTICS 
7051 040564 040514 i7$ SUMRECOVERABLE RETURN 
—* 040566 000673 ae 8s 3GO ISSUE LAST COPHARD . 
053 
7054 040570 004037 030076 25$: JSR RO, PRI200 STYPE HEADER ERRCE 
7055 040574 063223 EPR209 
7056 040576 000137 040260 June 4s 3CO TRY TO RETRY COMMAND 
7057 
7058 040602 122765 000021 000147 EC6$: CPR #21,P.RERDC( PS)  ;CHECR Tf REISSUE DATA TRANSFER 
7059 040610 101036 BRI 10$ 3VYES, INDICATE SUCESSFUL PECOVERY 
7060 040612 001424 BEQ 5$ zuo, OFFSET = #400 PICRC-INCHES 
7061 9 TSSUE DATA TRANSFER 
7062 040614 122765 000024 000147 cmes €24,P-RERD(RS) 3CHECK If OFFSET -400 MICRO-INCHES 
7063 040622 001420 BFQ 5$ sYES, ISSUE DATA TRANSFER 
7064 040624 122765 000027 000147 cure #27,P.RERD(RS) j;CHECK TF OPFSET 800 WICRO-IBCRES 
7065 040632 001414 BEG 5$ ZYES, ISSUE CATA TROMSEER 
7066 040634 122765 000032 000147 cvpa ——————— sCHECK Tf OFFSET -800 NICRO-IRCRES 
7067 040642 001410 BEQ SYES, ISSUE DATA TRARSFER 
7068 040644 122765 000035 000147 crea — gCHECK TF CPESET #1200 c5632tucuts 
7069 040652 001404 BEQ 5$ 3YES, ISSUE DATA TRANSFER 
7070 040654 122765 000040 000147 crPR €40,P.RERD(RS) CHECK IF OFFSET -1200 PICRO-IECHES 
7071 040662 001011 BNE 10$ 3¥C, TBCICATE SUCESSFUL RECCVERY 
7072 040664 105265 000147 5$: IWce P.RERD(RS) STIUCRENENT REREAD COUNT 
7073 040670 116565 000123 000001 uovs P.RCHD(RS),P.CHRD(RS) sRETSSUE COPMAND 
7074 040676 004037 050706 JSR RO, G.PUSH PENQUEUVE PARAPETES PLOCR Im CCHPARL 
7075 040702 001324 CrmiTa 3 IBITIATICN GUEVE 
ode 040704 000207 RTS pc sRETURN 
077 
7078 040706 032765 040000 000150 10$: BIT @BIT14,P.DSTTCHS) ZsCHFCK TF SERVICING BAD SPCTCP 
7079 040714 001403 BEQ 11$ 30, CONTINUE 
7080 040716 0605765 000146 tsTt P.RECTCRS) sCHFCK IF IW RETRY SEQUENCE 
7081 040722 001472 BEQ EC7$ 3"0, GO TC BAD SECTOR SERVICE ROUTINE 
7082 040724 105765 000210 11$: TSTR P.ASSRH( RS) sCHECK IF DRIVE IS BEING ASSICHEL 
7083 040730 001403 BFQ 12$ zuo, CHECK IF SEEF TO PREVICUS CYLINOFR 
7084 04073? 004737 035500 JSR PC, SURECY sTMIDICATE SUCCESSFUL RECOVERY 
7085 040736 000207 RTS pc sRETOPR 
71086 
7087 040740 122765 000117 000001 12$: c¥PR #SEEK,P.CYND(RS) sCRECK IF SEEK TC PREVIOUS CYLIBCER 
7088 040746 001404 BEQ 145 3YES, IRDICATE SUCCESSFUL RECCVERY 
7089 040750 122765 000140 000001 cMPR @RELEAS,P.CWNDC(FS) 3CHECK IF PELESSE 
7090 040756 001003 BNE 16$ 30, PROCESS DATA TRANSFER 
7091 040760 004737 035500 14$: JSR PC, SURECY sTMDICATE SUCCESSFUL RECOVERY 
pees 040764 000207 RTS Pc ;PETURD 
93 
J 7094 040766 004037 024506 16$: JSR RO, CHKADD sCHECK SECTOk, TRACK, CYLIBCER, BUS ACORESS 
1095 > ‘AD WORD CCUKD 
7096 040772 041030 20$ ZFRRCR RETUPR 
7097 040774 005037 177776 CLR PS ZALLOW RKOG INTERRUPTS 
7098 041000 122765 000121 000001 cupe @RDDATA,P.CWNDC(RS) 3CHECK If READ DATA 
7099 041006 001021 BWE 30$ gNC, CHECK) If shRITE CHECK 
7100 041010 004037 022760 JSR RO,PUFERI 3FIWD FIRST CATA FRROP 
7101 041014 041032 25$ ZERROR RETURN 
a A /¢ 


€ 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-P 


OZR6PB.P11 


7102 
7103 
7104 
7105 
7106 
7107 
7108 
7109 
7110 
7111 
7112 
7113 
7114 
7115 
7116 
7117 
7118 
7119 
7120 
7121 
7122 
7122 
7124 
7125 
7126 
7127 
7128 
7129 
7130 
7131 
7132 
7133 
7134 
7135 
7136 
7137 
7138 
7139 
7140 
7141 
7142 
7143 
7144 
7145 
7146 
7147 
7148 
7149 
7150 
7151 
7152 
7153 
7154 
7155 
7156 
7157 


041016 
041024 
041030 


041032 
041040 
041046 


041052 
041060 
041062 
041070 
041072 
041100 
041104 
041106 


041110 


041114 
041116 
041124 
041130 
041136 
041140 
041146 
041154 
041162 
041170 
041174 
041176 
041202 


041204 
041210 
041212 
041216 
041222 
041224 
041230 
041234 


041236 
041242 
041250 
041256 
041764 
041266 


041272 
041276 
041304 
041306 


041312 
041320 


11-AUG-76 


013737 
004737 
000207 


013737 
052765 
000137 


122765 
001356 
032765 
001752 
042765 
004037 
001324 
000207 


004037 


041202 
042765 
004737 
013765 
100022 
013765 
013765 
013765 
062765 
004037 
001324 
005037 
000207 


10576£ 
001012 
004737 
004037 
001314 
004737 
005037 
000207 


005037 
013765 
013765 
032777 
001002 
000137 


004737 
032765 
001402 
000137 


112765 
016565 


00:00 
001450 
035500 


001450 
000004 
034512 


000131 
000200 


000200 
050706 


024506 


040000 
041344 
001654 


001650 
001652 
001656 
000200 
050706 


001562 


000210 


022316 
050706 


022016 
001562 


001562 
001650 
001652 
040000 


015140 


022316 
002000 


015626 


177777 
000136 


177776 


177776 
000212 
000001 
000014 
000014 


000150 
000012 


000004 
000002 
600010 
000014 


0000 26 
000030 
137654 


000014 


000711 
000002 


MACY11 30€1046) O1-CEC-77 14315 PAGE 156 
ERROR RECOVERY SEQUENCE NORMAL PETURD 


16$: MOV REPRI,PS sLOCK CUT REOG ISTERRUPTS 
JSE PC, SURECY STEDICATE SUCCESSFUL PECOVERY 
20$: RTS Pc sPETUR 
25$3 nov REPRI,PS sLOCK COT REFOCE INTERKUPTS 
BIS aP1T2/P.ERK(RS) sTBDICATE CATA CCHPARE FRROR 
JMP E10$ SsPROCESS DATA COMPARE ERROR 
30$: CwPR GURTCHK,P.CHBDCRS) SCRECK IF WHITE CHECK 
BNE 18$ 3WO, IBDICATE SUCCESSFUL RECOVERY 
BIT @U.UCK,P.PRST(RS) sCHECK IF GRITE CHECK ISSUED 
BEG 18$ sVES, INCICATE SUCCESSFUL GECCVESY 
BIC SU.UCK,P.PRSTC AS) ZSCLEAR WRITE BEPORE WRITE CHECK 
JSR kO,Q.PUSH SENQUEUE COMMAND IN COMMAND INITIATION GUEUVE 
crurro 
RTS PC sPETURD 
EC7$: JSR RO, CHKADD sCHECK IF BUS ADD, WORD COUNT, SECTOR, 
3 TRACK ABD CYLIBDER ARE CORRECT 
9$ sERROR RETURE 
BIC #BITL4,P.DSTTCRS) ZCLEAR SERVICTAC PAD SECTCR 
JSR PC, ASTRAB SCALCULATE HUMBER CF WORDS TRANSFERRED 
mov BSUC,P.UCC( RS) SLCAC BUS ADOBESS FCR WEXT DATA TEANSFEF 
BPL 10$ SCHECK IF DATA TRAASFER FINISHED 
MoV BSSECT,P.SECT(RS) ;LOAD SECTCR ABD TRACK POR BERT CONPARL 
nov BSCYLH,P.CYLBC(R®) JLCAD CYLTADER FOF RENT CCHPARC 
MoV BSBA,P.BALO(RS) sLOAC BUS ADDRESS FOR MEXT DATA TEANSFER 
BIS OU.UCK,P.PRST(RS) 3CC ISSUE WRITE 
552 JSR RO,O.PUSH JENQUEVE COPPAED Th COMPARD INITIATION 
CIMIte 3 QUEUE 
CLR ERRPRO SCLEAR ERPOP PROCESSING FLAC 
9$3 RTS Pc sRETORD 
10$: TSTB P.ASSHC(RS) sCHECK TF PACK IS BEING WRITTER 
BNE 13$ 3YES, CPECK IF SEEK TO REXT CYLIBCER 
JSR PC, BUFREL SRELEASE BUFFER 
Jsk RO, C. PUSH JEMCUFUF PAPPETES BLOCK In CRKIVE 


AVATLQ 3 AUVAILIABLE QUEUE 


JSR PC, GETBUF sCET WEXT BUFFER FOR DAT TRANSFER 
CLR EPRPRO sCLEAR ERROR PETAC PROCESSING 
RTS Pc sRETURD 

13$: CLR ERRPRO SCLFAR ERROR BETNG PROCESSEC 
MOV BSSECT,P.DTS(PS) 3LOAD WEXT SECTCP AAD TRACE 
MoV BSCYLR,P.DCYL(RS) sLCAD WEXT CYLIPDER 
BIT #Sw14,eSuRr sCHECK IF LOCP O& CURRENT OPERATICH 
BWE 14$ sYES, ISSUE SEEF 10 PREVIOUS CYLIBDER 
JMP wVOS 3WC, CONTINUE TC WRITE PACK 

14$: JSR PC, BUFREL SRELEASE BUFEFR 
BIT #ORPORV,P.PRST(RS) 3CHECK IF DRCF DRIVE 
BEG 15$ 3MC ISSUE SEER TC PREVICUS CYLIWCES 
JMP w¥is sDROF DPIVE 


1552 MOVB #-1,P.SEEF(RS) 3SFT SEEF TO PRPEVICUS CYLINDER 
MoV PeLCYL(RS),P.CYLNCRS) ;GET LAST CYLIANEF 


see 0178 


7 
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==. 


Sf 


RK6G11/RKO6 PERFORMANCE EXERCISER PAINDEC DZR6P-8 
DzR6PB.P11 11-AUG-76 00:00 


7158 041326 016565 000140 000004 
7159 041334 112765 000117 000001 
7160 04134? 000712 


MACY11 30(1046) O1-DFC-77 14:15 PAGE 157 


ERROR RECOVERY SEQUENCE WORMAL RETURE 


P.LSEC(RS),P.SECT(RS) 3CET LAST TRACK AND SECTOP 
SSEEK,P.CHND(RS) 3LOAD COPMARD 
5$ 260 ISSUE SEER CCPMARD 


£&¢ 6175 


TY 











RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


DZR6PB.P11 


7161 
7162 
7163 
7164 
7165 
7166 
7167 
7168 
7169 
7170 
7172 
717? 
7173 
7174 
7175 
7176 
7177 
7178 
7179 
7180 
7181 
7182 
7183 
7184 
7185 
7186 
7187 
7188 
7189 
7190 
7191 
7192 
7193 
7194 
7195 
7196 
7197 
7198 
7199 
7200 
7201 
7202 
7203 
7204 


041344 
041352 
041360 
041364 
041372 
041374 
041400 
041404 
041412 
041414 
041420 
041424 
041430 
041434 
041436 
041440 
041442 
041444 
041450 
041452 
041454 
041460 
041462 
041466 
041472 
041474 
041500 
041502 
041504 
041510 
041512 
041516 
041520 
041524 
041526 
041532 
041536 
041542 
041544 
041550 
041554 
041556 


11-AUG-76 00:00 


016537 
016537 
105237 
122737 
103014 
105037 
103237 
122737 
103004 
105037 
005237 
013746 
166516 
011646 
006316 
062616 
005046 
113716 
062616 
005046 
116516 
162616 
012746 
004737 
005046 
113716 
062616 
0050 46 
116516 
162616 
111666 
105016 
011637 
006316 
066516 
011637 
166516 
006216 
066516 
012637 
005726 
000207 


000026 
000030 
001650 
000025 


001650 
001651 
000002 
001651 
001652 


001652 
000002 


001651 


000026 
054064 


001650 


000004 
000001 
001660 
000010 
001656 
000132 


000130 
001654 


MACY11 30(1046) 


O1-DEC-77 14:15 PAGE 158 


CALCULATE WORDS TRAWSFERRED UNTIL BAD SFCTOR 


eSBTTL CALCULATE WORDS TRANSFERRED UNTIL BAC SFCTCE 


001650 BSTRAN: MOV 


00165? 
001650 


001651 


“ov 
Ince 
CuPB 
BRIS 
CLRB 
INCB 
cmuPeB 
BHIS 
CLRB 
Inc 
nov 
SUB 
mov 
ASL 
adD 
CLR 
wOovVB 
aDD 


P.DTSC(RS),BSSECT ;STORE ADDRESS OF PAD SECTCR 


P.DCYL(RS),BSCYLE 

BSSECT ZADVANCE TC BEXT SECTOR OW FACE 
#21.,B8SSECT sCHECK POP SECTCR OVERFLOW 

5$ 3NO, CONTINUE 

BSSECT sCLEAR SECTOR 

BSTRCEK SIACKEMFRT TEACK 

#2,BSTRCK sCHECR FOR TRACK CVERFLOU 

58 sO, CONTINUE 

BSTRCK sCLEAR TRACK 

BSCYL® STUCKEEMENT CYLIRCER 

BSCYLR,-(SP) sSTORE CYLINDER CR STACK 
P.CYLE(RS),C(SP) sSUBTRACT STARTING CYLINDER 

(SP ),-CSP) SSAVE DIFFERENCE 

(SP) SPULTYPLY CYLTADEF BY 3 

(SP)e, (SP) 

-(SP) sMAKE ROOW OW STACK 

BSTRCK, (SP) sPLACE TRACK OCB STACK 

(SP )¢,(SP) 30D THRACE 

-(SP) sPAFE ROOM CB TRE STACK 
P.TRCK(RS),(SP) sSTORE TRACK 

(SP)¢, (SP) SSUBTRACT INITIAL TRACK 
822e¢-CSP) sSTOKE 22 OW STACK FOR PULTIPLICATICH 
PC, SMULT SPULTIPLY BY 22 

-(SP) SMARE ROOwW OW TRE STACK 

BSSECT,( SP) sSTOKP RAD SECTCE 

(SP)¢,(SP) 3ADD BAD SECTOR ADDRESS 

-(SP) sMAKE ROOM OB TRE STACK 

Pe SECT(RS),(SP) sSTORE ORCIFAL SECTCR ADDRESS 
(SP)+¢,(SP) SSUBTRACT CRPCIBAL SFCTCF ADDRESS 
(SP),1¢SP) sFEEP NUMBER CF SECTORS TRANSFERSED 
(sP) 

(SP), P SWORD sLGAD WORD COURT 

(SP) sMOLTIPLY BY 2 

P.BALOCPS),(SP) sCET STARTING ADDRESS FOk NEW DATA 
(SP), BSBA sCET WEW BUS ADDRESS 
P.RPALC(RS),(SP) sCET BRUPBER CP BYTES TRANSFERPED 
(SP) SCCHVERT TO BORDS (CIVIDE BY 2) 
P.RWC(RS),(SP) sDETEPMIBE REPAIRING WORD COURT 
(SP) ¢,B8SuC SSTOBE CALCULATED wCRO COURT 
(SP) sTHPGW AWAY HCST SIGNIFICANT BITS 
Pc sRETUPRN 


KY 
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RK611/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-8 


DZR6PB.P11 


7205 
7206 
7207 
7208 
7209 
7210 
7211 
7212 
7213 
7214 
7215 
7216 
7217 
7218 
7219 
7220 
7221 
71222 
7223 
7224 
7225 
71226 
7227 
7228 
7229 
7230 
7231 
7232 
7233 
7234 
7235 
7236 
7237 
7238 
7239 
7240 
7241 
7242 
7243 
71744 
1246 
71246 
7247 
7248 
7249 
7250 
7251 
7252 
7253 
7254 
7755 
71256 
7257 
7259 
7259 
7260 


041560 
041566 
041570 
041572 
041600 
041602 
041606 
041614 
041616 
041622 
041626 
041632 
041634 
041640 
041642 


041644 
041650 
041654 
041660 
041662 
041666 
041670 


041672 
041700 
041706 
041710 
041714 
041716 
041724 
041726 


041730 
041736 
041744 
041746 
041754 
041762 
041770 
041774 
041776 
042002 
042004 
042010 


042012 
042020 
042026 
042030 
042036 
042040 
042044 
042050 


11-AUG-76 00:00 


032765 
001401 
000000 
132765 
001157 
004737 
122765 
001076 
013746 
162716 
026526 
001404 
004037 
062205 
000207 


016546 
062716 
023726 
001404 
004037 
062162 
000207 


042765 
022737 
001413 
004037 
042250 
063765 
100410 
000464 


052765 
013765 
100055 
013765 
013765 
013765 
004037 
001324 
005765 
001002 
005037 
000207 


042765 
122765 
001343 
022737 
001734 
012746 
163716 
012665 


040000 


000010 


041344 
000121 


001656 
001000 
000024 


036524 


000022 
000400 
001654 


036524 


100200 
000400 


022760 
001660 


000200 
001654 


001652 
001650 
001656 
050706 
000146 
001562 
100200 
000131 
000400 
000400 


001660 
000012 


000210 


000001 


000150 
001660 


000012 


000014 
000012 


000002 


000004 
000010 


000150 
000001 


001660 


MACY11 30(€1046) O1-DEC-77 14:15 PACE 159 


BAD SECTOP RANDLING 


eSB8TTL BAD SECTOR HANDLING 
000150 B8DSECT: BIT 


10$: 


15$: 


19$: 
2052 


2252 


27$: 
25$: 


BEQ 
HALT 
BITS 
BWE 
JSR 
CrPB 
BRE 
MOV 
SUB 
CMP 
BEQ 
JSR 
EPROT1 
RTS 


nov 
add 
CrP 
BEQ 
JSR 
ERRO70 
RTS 


BIC 
CMP 
BEQ 
JSE 
50$ 
aco 
BY 
BP 


BIS 
MOV 
BPL 
MoV 
Mov 
mov 
JSR 
Crarra 
151 
BWE 
CLR 
kTS 


BIC 
CMee 
BWE 
CMP 
BEQ 
MoV 
S08 
MoV 


@BIT14,P.DSTTCRS) Z;CHECF IF PRESENTLY SERVICING BID SECTCE 
S$ 380, CONTINDE 


@BITI,P.ASSHCRS) ;CHECK IP REACINC PACK SERTAL BUPBER 


40$ sYES, DETERMINE BEXT SECTOR 

PC, BSTRAN SCALCOLATE WORDS TRANSFERPEC 
SRDDATA,P.CPNDCRS) SCHECK IP REAL CChWARD 

25$ 380, PO BC CHECK BUS ADDRESS AND BORD COURT 
BSBA,-(SP) sSTORE BUS ADDRESS 


#256.°%2,(SP) SSUBTRACT ADOITICHAL SECTOR 
P.BARCRS),(SP)e¢ sCHECE Tf BUS ADDRESS CCRRECT 


10$ dYES, COBTIRUE 

RO, COWERR SPRINT “BUS ADDRESS IRVALID® 

Pc sPETURN 

P.WCRCRS)o-C(SP) ZSTORF WORD CCURT FOR CONPARISOR 
#256.,(SP) sSUBTRACT CFF BAC SECTCR 
BSUC,(SP)¢ SCHECK TF BORD COUNT CORRECT 

15$ sYES, CONTINUE 

RO, CORERR SPRIKT “WORD COURT INVALID® 

PC sRETORG 


SPITISIBIT7,P.DSTTCRS) sCLEAG FIEST ERRCKH AWD EREGCKE ERQUEVEL 
€256.,8Sw0Rd sCHECF TF NO WCROS TRANSFERRED 
20$ sYES, DO WOT CHECK DATA 
RO, BUPER) sCHECR DATA BEAD 
ZERROR PETUPH 
BSWORD,P.WC(RS) SCALCULATE WEW WCRD COUST 
22$ SCHECK TF DATA TRABSFER BOT COMPLETE 
30$ SDATA TRANSFER CCPPLETE 


#¥.WCF,P.PRST(RS) ZISSUE WRITE BEPORE WRITE CRECK 
BSuC,P.UC(RS) sCET WUPBER CP WCROS TO BE TRANSEFERRET 
30$ sCHECF TF DATA THRARSFER COMPLETE 
BSCYLN,P.CYLN(RS) ;CET WEW CYLINDER 

BSSECT,P.SECT(RS) sCET WEW SECTOR 

BSBA,P.PALCC(RS) 3CET WHEW PUS ACDBFSS 


RO,Q.PUSH sPUT PARAWETEP ITB COMPARD 
3 «IBITIATION QUEUE 
P.RECT(PS) sCHECK TF ERECR RECOVERY Th PROGRESS 
23$ sVES, DC NCT BESET ERRCR PRCCFESSING IN PECCRESS 
ERRPRO SPESET ERROP PROCESSING IW PROGRESS 
Pc sRETUR 


SBITISIBIT7,P.OSTT(RS) sCLESK FIGST ERRCR AWD ERKCKH EWQUECET 
@WURTCHK,P.CMND(RS) sCHECK IF WRITE CHECK COPMAAD 


20$ s*C, CONTINUE 

#256.,B8SUCRP SCHECK TF NC WCPRDS TRANSFERPED 
19$ SYES, ISSUE KEXT DATA TRANSFER 
#256.,-(SP) SSTORE EXCESS BORD COUNT OM STACK 


BSwCRO,(SP) sCALCULATE KEW WCRKD COUNT 
CSP)¢,P.UC(RS) ZSTOKRE BREW WORD CCUNT 


See 0181 


Lig 


a a ae SS SE — — — — 


RK611/RKO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-F 
11-AUG-76 00:09 


DZR6PB.P11 


7261 
126? 
7263 
71264 
7265 
7266 
71267 
7268 
7269 
7270 
7271 
7272 
727? 
71274 
7275 
7276 
7277 
7278 
7279 
7280 
7281 
7282 
7283 
7784 
7265 
7286 
7287 
7289 
7289 
7290 
7291 
129? 
7293 
71294 
1295 
1796 
7297 
7298 
1299 
7300 
7301 


042054 


042062 
042070 
042074 
042076 


042100 
042104 


042110 
042112 
042116 


042120 
042124 
042126 
042132 
042136 


042140 
042146 
042154 
042156 
042164 
042172 
042200 
042206 
042212 
042214 
042220 


042222 
042226 
042232 
042236 
042242 
042246 


042250 
042256 


052765 


042765 
004037 
001324 
0002707 


004737 
005765 


001403 
004737 
000207 


004037 
001314 
004737 
005037 
000207 


042765 
122737 
101422 
116565 
016565 
016565 
016537 
004037 
001324 
005037 
000207 


004737 
104401 
004737 
004737 
005037 
000207 


052765 
000137 


000200 
050706 


022316 
000146 


035500 


050706 


022016 
001562 


100200 
000010 


000123 
000124 
000126 
000130 
050706 


061562 


022316 
063003 
012716 
022016 
001562 


000004 
034512 


MACY11 30(1046) O1-CEC-77 14215 PACE 160 


BAD SECTOR HANDLING SEG 0182 
000150 BIS @BIT14,P.OSTTCRS) ZIMDICATE THAT PAD 
SECTOR IS PETHC PROCESSED 
000014 BIC QU.UCK,P.PRSTCRS) 30C WRITE CRECK PART CF CChPARE 
JSR RO,Q.PUSH sPUT PARAPETER BLCCK IN CONPARD 
crurro 3 ISITIATION QUEUE 
RTS Pc sPETUPE 
30$: JSR PC, BUPREL SPELEASE BUPFER 
Tst P.RECTCRS ) SDETERMTBE TE CORRERTLY URDERCOTEC ERROP 
3 RECOVERY 
BFG 35$ sYES, PUT IN AVAILIABLE QUEVE 
JSR PC, SURECY STMDICATE SUCCESSFUL RECOVERY 
RTS ec sPETURS 
35$: JSR RO,Q.PUSH SENQUEUE PAPAPETER BLOCK I 
AVAILO 3 §=AVAILIABLE QUEVE 
JSR PC, CETBUF SCET WEXT BUFFER 
CLE ERRPRO sCLEAR EERCR PEIBC PROCESSED 
RTS Pc sPETURE 
000150 40$: BIC @BITISIBIT7,P.OSTTC(RS) sCLEAR FIRST ERRCR ABD ERRCR EWQUEVED 
000126 CrPP #0 .,P.RSEC sCHPCK TF ALL SECTORS HAVE BEEN BEAD 
BLOS 45$ 3YES, DROP DRIVE FROM TEST SEQUEBCE 
000135 uors P.RCMD(RS),P-LCWDC(RS) ZSTCRE PREVICUS cCoMABD 
000136 nov P.RCYL(RS),P.LCYL( RS) 
. 000140 MOV P.RSEC(RS),P.LSEC(RS) 
000142 nov P.RVUC (RS ),P.LUC 
JSR RO,Q.PUSH SENQUEVE PARAPETER PLOCK IB CCMPARS 
crurro 3 IBITIATICA GUECE 
CLR ERRPRO SCLEAR ERPOR RECOVERY IN PROGRESS 
RTS Pc sRETURD 
45$: JSR PC, BUFREL 260 BELEASE BUFFER 
TYPE aERP204 
JSR Pc, DROP sDROP DRIVE FROM TEST SEQUENCE 
JSR PC, CETBOF SCET NEW BUFFER 
CLF ERRPRC sCLFAR ERRCR FECCVEFY If PRCGRESS 
RTS Pc 3PETUPRD 
000712 S05: @1s #BIT2,P.ERR(RS) ZJSET DATA TYPE ERFOR 
J¥P E10$ 3GC FRCCESS CATA FRECP 


M$ 











RFGL1/R2706 PERFORWANCE EXERCISER PAINDEC DZR6P-" MACY11 20€1046) O1-OFC-77 14:15 PACE 161 
DZR6PR.P11 11-80G-76 00:00 ERRCh BECOVFRY SECUFNCE APRORPAL PETUPR 8c C1@3 ( 
7002 eS8TTL EPROR RECOVERY SEQUENCE APROKMAL RETURN ‘ 
203 
7304 042262 032765 000120 000150 ECVY?: BIT GBIT41BIT6,P.OSTTCR®) ;CHEC® Te CIACNOSIEC SEQUEBCE 
7305 042270 001524 BEQ 35$ 3™0, CO TO ERPOR PECGVERY SEQuvERCE 
7306 042772 004737 027247 JSR PC, PRIOCO 7PRTIRT READER J 
7307 042276 104401 063172 TYPF ®hP208 7TYPE @FERRCPE WHILE CEAGBCSING ---* 
73208 042302 032765 000020 000150 BIT @B1T4,P.DSTT(°S) SCHECK If HEADER TYPE ERPCR 
7309 042310 001005 Ate 2$ VES, POINT PESSACE J 
7310 042312 104401 061427 TYPE sERPOS2¢61 STYPE "TIPE COT BRILE DPLVE PCSTTICR® 
7311 042316 104461 001165 TYPE eSCPLP TYPE <CR><LED> 
yess 042322 000402 BP 3$ 3CO FRIPT STATUS 4 
13 
7314 042724 104401 063224 2$: Tve® ERR 20901 sPRIAT MEADFS TYEE ERPCE 
7315 042330 032777 020000 136602 3$: BIT eS¥13,eSuP CHECK Te INHIBIT PRINT OUT ( 
7316 042336 001066 BNE 30$ YES, DO NOT PRIBT STATUS 
7317 042240 032765 000020 00021? eit @PIT4,P.ERR(RS) PCHECK TF OP IVE SEIZED TIPE GOT 
7318 042346 001402 BEG at ( 
7319 042350 104401 061744 TYPE 7 ERPOS9 
7320 042354 032765 000040 000212 4%: BIT GRITS, P.ERRCRS) SCHFCFE IF TYPE OUT WHILE ORIVE PCSITICHIAC 
7221 042762? 001402 BFQ 5s ( 
7322 042364 104401 061427 TYPE FRPOS2¢1 
7323 042370 032765 000010 00014 S$: BIT QUETATT,P.PESTCPS) sCRECK IF UNEXPECTED ATTENTICS 
7324 042376 001402 BEQ 65 ( 
7725 042400 104401 061027 TYPE 7FR2020 
7326 042404 03276 000020 000014 6%: BIT PORVAHWO,P.PRST(PS) ;CHECK If CRIVE BARD EPECR 
73227 042412 001402 BEG 7$ ( 
7328 042414 104401 060744 TYPF 7 €RkRO27 
7229 042420 032765 000040 000014 75: BIT @ORVOSC,P.POST(RS) SCHECK If DSC CIP WOT CLEA® 
71330 042426 001402 BFC 8s ( 
7331 042430 104401 060763 TYPE 7 ERPO28 
7332 042434 032765 004000 000014 4$: BIT @VODSC,P.PRST(RS) ;CHFCK TF ATTN PUT NO OSC OR FAULT 
7332 042442 001402 BFQ 11$ ( 
7334 042444 104401 061667 TYPF ,ERPOSE 
7335 042450 004737 025550 11$: JSR PC, PRISTT sPRIAT CONTPCLLER STATUS 
7336 042454 004737 025374 JSR PC, PROSTT PRINT DRIVE STATUS J 
7337 042460 004737 027476 JSR PC, PRIOC2 gPRIDT RETRY CCPRARD 
7338 042464 010546 nov RS,-(SP) 3STCKE RS OW STACK 
7339 042466 012705 004512 “ov #PAPM10,R5 LCAC RS POR PREVICUS STATUS ( 
7340 042472 104401 063243 TYPE /FRR210 TYPE "FERST ERRCP INFO" 
7341 042476 004737 025550 JSR PC, PRISTT 3PRTA? CONTPGLLER STATUS 
7342 042502 004737 025374 JSR PC, PRESTT ZPRIAT DRIVE STATUS ( 
7343 042506 004737 027476 JSR PC, PRIO02 #PRIDT INITIAL CCPMAND 
7344 042512 012605 mov (SP )#,R5 RESTORE RS 
1345 042514 005765 000706 30$: INC P.WER(RS) sINCREPENT CTRER FRRO?S ( 
7346 042520 004737 030472 JSk PC, HLTOOO 7CHECK TF HALT CK ERRCR 
7347 042524 004737 022316 JSR PC, BUF REL ;PELEASE BUFFER 
7348 042530 004737 012716 JSK pe, DROP Z3DROE DRIVE ( 
7249 042534 004737 022016 JSK PC, CETBUF 3CO ALLOCATE PUFFFRS 
vane 042540 000405 BR 40$ ;CHFCR Tf ERBCK GUEVE EPPTY ‘ 
$1 
7352 042542 004737 031224 35$: JSk PC, ERCVY 3760 OO FRROR RECCVERY 
7353 042546 005737 001562 tst ERRPRO pCHECK TF EPRCR RECOVERY ON LAST CAIVE 
7354 3 TS FINISHED ( 
7355 042552 001007 BNE 45$ 3NO, PETUPN 
7356 042554 004037 050766 40$: JSR RO,0.POP GET WEXT ELEVENT FROW 
7757 042560 001330 ERRPRO 3 ERRCR PRCCESSING GUEDE ( 
Als 
, ( 








RE611/REO6 PERFORMANCE EXERCISER MATNDEC 1 yn 


DZR6PP.PI1 


7358 
7359 
7360 
7361 
1362 


042562 
042564 
042570 


042572 


11-AUG-76 00:00 


012605 
010537 001562 
001364 


000207 


MACY11 30(€1046) O1-CEC-77 14315 PACE 162 
RECOVERY SEQUENCE APNORWAL RETURN 


(SP)o,R8S 
RS, ERRPPO 
35$ 


SLCAD PARAMETER BLCCK 

sLOAG CURRENT PROCESSING ERPOP 

3TF ERROR PROCESSING QUEVE BOT ERFTY Co 
3 PROCESS BERT ERROR 

sRETURS 








RF611/REO6 PERFORMANCE EXERCISER MAINDEC DZR6P-F 


DZR6PB.P11 


7363 
1364 
7365 
1366 
7367 
136°” 
7369 
7370 
7371 
7372 
7373 
7374 
7375 
1376 
7377 
7378 
‘ 7379 
7380 


042574 
042602 
042610 
042614 
042622 


042624 
042626 
042634 
042640 
042646 


042650 
042652 
042660 
042664 


11-AUG-76 00:00 


012737 
012737 
005777 
112737 
000413 


022626 
012737 
005777 
112737 
000401 


022626 
012737 
005037 
000207 


042624 
000340 
136522 
177777 


042650 
136502 
000001 


000004 
000006 


001374 


000004 
001374 


000004 


macvil a O1-CEC-77 14215 PACE 163 


DETERWINE IF CLOCK IS PRESEN 
eSBTTL DETERMINE IF CLOCK IS PRESENT 


CHKCLK: MOV 


15$: 
2052 


sec oie: 
#5$,ERRVEC SET OP ERRCR VECTOR FOR BOR-EXISTERT HEPCHY 
@PR7,FREVEC®2  ;LCCK ALL INTERRUPTS 
eSLecss pCHECK FoR P cuoce 
@-1,CLKPLC dTMDICATE KW11-P PRESENT 
20$ PLCAC CCMPOR CLCCR PARAPETESS 
(SP )o, (SP eo pADJUST STACK 
#15$,ERRVEC SET UP ERROR VECTOR FOP ROR-EXISTERT HEPCEY 
eSLes sCHPCK FOR L CLCCE 
@1,CLEFLG SET KW11l-L PRESENT 
20$ PRETHSTATE TRAP CATCHER 
(SP)*,(SP)¢ ZADJIUST STACK 
#ERRVECO2,ERRVEC }REINSTATE TRAP CATCHER 
ERRVEC*? 
Pc ;PETURD 


als 








RE611/RKO6 PERFORMANCE EXERCISER PATNDEC OZP6P-B 
DZR6PB.P11 11-AUG-76 00:00 


7761 
7382 
7383 
73864 
7385 
7386 
73867 
7768 
7389 
7390 
7391 
7392 
1393 
7394 
7395 
7396 
7397 


042666 
042672 
042674 
042676 
042702 
042710 
042716 


042720 
042724 
042732 
042736 
042742 
042750 
042756 


105737 
001431 
100011 
013701 
012777 
012777 
00040* 


013701 
012777 
012721 
012711 
113737 
113737 
000207 


001374 CLKINT: 


001340 
177777 
000135 


136426 
136416 


001344 
000100 
042760 
000300 
001352 
001360 


552 
10$: 


136410 


00135? 
001375 
20S: 


TsTP 


MACY11 30€1046) O1-CEC-77 14:15 PACE 164 


SET UP CLOCK INTERRUPT 
-SB8TTL SET UP CLOCK INTERRUPT 


CLKFLG 

20$ 

5$ 

$LPVEC,R1 
#-1,@SLECSB 
#135, @SLKCSP 
10$ 


SLLVEC, RI 
ſpuoo, @SLKS 
@CLOCK, ( 
—MXX 
HZ,CLEFRQ 
PERINY,PERICD 
pc 


SEG O1F¢ 


sCHECR TF A CLOCK IS ON SYSTEP 
200, RETURS 

sCHECK TF KW11-L 

sLOAC VECTCR ACDRESS 

sLOAD COUNT BUFFER WITH 1°S 
sSET COURT OP, 16 MS, CONT 
sLCAC COMMCH CLCCR PARAPETERS 


sLOAC VECTOR ADDRESS 

sSET UP L CLOCK FCR INTERRUPT ACDE 

sLOAD ADDRESS OF INTERRUPT POUTIBE 

sSET UP FOR PRICKITY 6 

sSET UP CLOCK FREQUENCY 

SSET UP COUNTER PCR INITIAL STATISTIC SUPPASY 
sPETURS 


Ds 








RE611/RKO6 PERFORMANCE EXERCISER MATNDEC DZR6P-B8 


OZR6P8.P11 


7398 
7399 
7400 
7401 
7402 
7403 
7404 
7405 
7406 
7407 
7408 
7409 
7410 
7411 
7412 
7413 
7414 
7415 
7416 
7417 
7418 


042760 
042764 
042766 
042774 
043000 
043006 
043010 
043014 
043020 
043022 
043026 
043030 
043036 
043044 
043050 
043056 
043060 
043064 
043070 


11-AUG-76 00:00 


105337 
001041 
113737 
005237 
022737 
001030 
005037 
105737 
001411 
105337 
001006 
113737 
112737 
005237 
022737 
001004 
005037 
005237 
000002 


001353 


001352 
001372 
000074 


001372 
001360 


001375 


001360 
177777 
001370 
000074 


001370 
001366 


001353 
001372 


001375 
001627 


001370 


MACY11 30€1046)° O1-CEC-77 14215 PACE 165 


KW11-€ AND FW11-P INTERRUPT HANDLER 
oSBOTTL KWL1-~L AWD FW11-P INTERROPT HANTLEG 


CLOCK: 


10$: 


@60.,SECOND 
10$ 

SeCcOuD 
PERTINV 

58 

PERTOD 

5 


$ 

PERTNV, PERIOD 
#-1, STATIS 
MINUTE 
860.,PIRUTE 
10 


sCHECK IF OWE SECOND PASTED 


200, PETURS 


SRETINITTIALI7E SYSTEP CLCCE 
STUCREMEST SECOHOD COURT 
sCHECK If MINOTE RAS OCCURRED 


380, PETUPE 
sCLEAR SECCRE 


sCHECK JF INTERVAL STATISTICS 

380, UPDATE MINUTE COUNT 

SDECRENEST PERIOD COURT 

sCHECK TF EWC CP PERICO, IF BCT UPCATE PIRUTE CCUBT 
SIBITIALIZE PERIOD 

STEDICATE TIME POR STATISTIC TYPE OUT 

STOCKEMFRT PIBUTE CCURNTER 

SCHECK TF HOUR RAS CCCURED 


380, RETURE 


SCLEAR WIPUTE COURT 
sTUCKEMENT ACOR CCURT 


sPETURN 


sto 0187 











le 0 0 0 © 0 0 0 0 0 0 0 0 0 0 0 0 oo oo | 


REF611/RK06 PERFORMANCE EXERCISER MATHDEC DZR6P-B 
11-AUG-76 00:00 


DZR6PB.P11 


7419 
7420 
7421 
742? 
7423 
7424 
7425 
7426 
7427 
7428 
7429 
7430 
7431 
7432 
7433 
7434 
7435 
71436 
71437 
7438 
7439 
7440 
7441 
7442 
71443 
71444 
7445 
1446 
71447 
7448 
71449 
7450 
7451 
7452 
7453 
7454 
7455 
7456 
7457 
7458 
71459 
71460 
7461 
7462 
71463 
1464 
7465 
1466 
1467 
7468 


043072 
043076 
043100 
043102 
043106 
043114 
043122 
043130 
043136 
043142 
043146 
043150 
043154 
043160 
043162 
043164 


043166 
043172 
043176 
043202 
043206 
043212 
043216 
043222 
043224 
043230 
043232 


043234 
043236 
043244 
043246 
043250 


043252 
043260 
043264 
043266 
043272 
043274 
043276 
043302 
043304 
043310 
043312 


105737 
001455 
010046 
013746 
012737 
013737 
013737 
013737 
012637 
012700 
105010 
013746 
162716 
100402 
105210 
000773 


062716 
152720 
004737 
013716 
004737 
013716 
004737 
005726 
104401 
012600 
000207 


105010 
162766 
100402 
105210 
000772 


062766 
152720 
105010 
005766 
001404 
105210 
0052766 
001374 
152720 
105720 
000707 


001374 


177776 
000340 
001366 
001370 
001372 
177776 
063734 


001376 
000144 


000144 
000060 
043234 
001400 
043234 
001402 
043234 


063727 


000012 


000012 
000060 


000002 


000002 
000060 


177776 
001376 
001400 
001402 


000002 


000002 


MACY11 30(1046) O1-CEC-77 14315 PACE 166 
PPINT TIMF ROUTINE 


eSBTTL PRINT TINE POUTING 


PRITIM: TSTB 
BEG 


1$3 s0B 


2$3 ADD 


50$: RTS 


eSBTTL CONVERT 


CONHUN: CLRB 

1$3 SUB 
BMI 
Incr 
BPR 


S$: ADD 
BISR 
CLRB 
Tst 
BEQ 
65: Ivcs 
DEC 
BWE 


783 BISe® 


TSTB8 
RTS 


CLKFLG 

50$ 

RO,-( SP) 
PS,-(SP) 
gPRI,PS 
HOUR, TIPHE 


MINUTE, TIPHIN 
SECOND, TIPSEC 


(SP )¢,PS 
#T1P001,R0 
CRO) 

TIMAR, -(SP) 
#100.,(SP) 


#100.,(SP) 
8604 (RO )o 
PC, CORHUN 
TIMMIN, (SP) 
PC, CORHUS 
TIMSEC, (SP) 
PC, CORHUN 
(SP) 

7 TIn000 

(SP )o,RO0 

Pc 


sCHECK If CLOCK GF SYSTEN 
30, PETURE 

sSAVE RO 

sSAVE PSY 

sLOCK GOUT CLOCK 

SSAVE TIME PCH PRINT CUT 


SRESTORE PS 

sLOAC KO PCR TBCER 
SDETERMINE AURDPEOS OF HOURS 
SSTORE HCORS FOR CONVERSION 
SCONVERT RURORECS 

sCHECK TF TOO SPALL 


sMAFE DIGIT ASCII 

sLGAD STACK FCK HIRUTES 
SLOAD STACK FOR SFCCRDS 
sADIUST STACK 

sTYPE TIME: 


SRESTORE RO 
sRETURD 


DECIMAL LESS TRAN 160 


(RO) 
#10.,2(SP) 
5$ 


(RO) 
1$ 


#10.,2(SP) 
#60, (RO D+ 
(RO) | 


6$ 

#60, CRO) 
(RO Do 

PC 


sZERC DIGIT 
sCONVERT TERS 


SPARE ASCII 
sZEPC DIGIT 


sCONVERT OWES 


sMAFE ASCTI 
ZSKIP OVER CCLOR 











RK611/RFO6 PERFORMANCE EXERCISER MATNDEC DZR6P-B MACY11 30(1046) O1-DEC-77 14315 PAGE 167 

DZREPP.P11 11-AUG-76 00:00 RKGLI/RKOG UNIBUS DRIVER FOR QUEVED OPERATIONS (REV. 0.06) SEQ 0185 <q 
71469 eSBTTL REE1L/RKOG6 UNTBUS DRIVER FGR QUEUED CPERATICHS (REV. 0.08) ‘ 
7470 
7471 s*COPYRIGPT (C) 1975 
747? *DIGITAL EQUIPMENT CORP. 
7473 3*MAYNARD, WA. 01754 <q 
7474 3*AUTHOR: ROY SPITZER 
7475 
7476 -SBTTL *WATCH-DOG TIMER | 
7 
eed FP TAAAAAASARSARAAAAAAAAAARARSHAAAAARSHAARAASAAAAAAGAAA TREK AAAAAAAES q 
7479 3* 
7480 3* THE WATCH-DOG TIMFR DCES A PSFUDG-TINING CF REOG UNTBUS 
7481 3* SUBSYSTEM COMMAND. SINCE ONE CAN WOT CUARANTEE THAT A 
748? 3* REAL-TIME CLOCK (RW11-P OR KW11-L) IS CH THE SYSTEM <q 
7483 3* THE RKO6 DRIVER WILL USE THE LOCATICA B.PTIP POR 
7484 3* MILLI-SECOND TIMING. WHEN W.NTIM REACRES ZERO THE 
7485 3* WATCH-DOG TIMER WILL SCAM TRE DRIVES IB USE AS q 
7486 3° DETERMINED BY TRE LOCATION W.TIME. THE TIPER COUNTS 
7487 3* (OWE FOR EACH DRIVE) ARE KEPT IW THE TABLE W.DRV. 
7488 3* IF ANY COUNT IN THE TABLE W.ORV REACHES ZERO A COMMAND <q 
7489 3* TIME-OUT WILL BE DESIGNATED IN THE PECCRAP CEVICE STATUS 
7490 3° REGISTER OF THAT DRIVES PARAWETER BLOCK. ‘ 
7491 3* 
7492 3* THE DRIVER WILL USE THE LOCATION W.HIR AS THE NONBES 
7493 3* OF MILLISFCONDS FOR AW UNLOAD OR START SPINDLE CoMNaND. 
7494 3* THE DRIVER WILL USE TRE LOCATION W.SEC AS TRE TINE < 
1495 3* LIMIT FOR ALL OTHER CONWARDS. 
7496 37 
7497 3* FOR QUEVED OPERATIONS TRE WATCH-DOG TIWER WILL q 
7498 3* WATCH UP TO 6 OPERATIONS SIWULATEQUSLY. FCR SEQUENTIAL 
7499 3* OPERATIONS ONLY ORE OPERATION WILL PE WATCHED. 
7500 37 q 
7501 "CALL JSR PC, W.WTCH 
7150? 3* RETURN IF NO DRIVE CROFR EXCEEDED ITS TIME LIMIT ‘ 
7503 3* 
7504 3* OTHERWISE AW ABNORMAL RETURN TO THE ROUTIRE ADDRESS 
7505 3 BY LOCATION A.ABNL WILL OCCUR AND THE C¥OTO FLAC 
7506 38 IN THE PROGRAM DEVICE STATUS REGISTER CF THE | 
7507 3* APPROPRIATE PARAMETER BLOCK WILL PE SET. 

Rg . 

ios t snoenesacqnconssseconnnaseceaseqeansanenenoneessnnseosenesnenete q 
7510 
7511 043314 010546 W.WTCH: MOV RS,-(SP) #SAVE RS OW TRE STACK 
7512 043316 010446 MOV R4,-(SP) #SAVE R4 OW TRE STACK <q 
7513 043320 010346 MCV R3,-(SP) SAVE F3 Ch TRE STACK 
7514 043322 010246 MOV R2,-( SP) SAVE R2 OW STACK 
7515 043324 013746 177776 MOV PS,-(SP) ZSAVE PROGRAM STATUS WORD OW STACE | 
7516 043330 005337 001464 DEC woMTIP CDECKEMENT PILLISECCND TIMES 
7517 043334 001046 BNE 20$ 37F BOT ZERO RETURD 
7518 043336 013737 001466 001464 mov W.MILIZW.PTIM s$REINITIALIZE MILLISECOND TIMER | 
7519 043344 013737 001450 177776 MOV REPRI,PS sLOCK OUT RKO6 TATERRUPTS 
7520 043352 013702 001444 MCV RFBAS,R2 3LOAC BASE CF BROG REGISTERS 
7521 043356 005004 CLR R4 CLEAR INDEX OF DRIVE MASKS | 
7522 043360 005003 CLR R? CLEAR THDEX OF DRIVE TIKES 
7523 3 ABD PARAMETER PLCCK ADDKFSSES 
7524 043362 136437 001510 001506 1S: BITB INTPSE(R4),WoTIME ;CHECK IF DRIVE IS BEING TIED | 


Cl” 





RKG11/REO6 PERFORMANCE EXERCISER MATNDEC DZR6P-8 


DZR6PR.P11 


7525 
7526 
7527 
7528 
7529 
7530 
7831 
7532 
7533 
71534 
7535 
7536 
7537 
7538 
7539 
7540 
7541 
7542 
7543 
71544 
7545 
71546 
71547 
7548 
7549 


043370 
043372 
043376 


043400 


043404 
043412 
043420 


043424 


043426 
043432 
043436 


043442 
043444 
043450 
043452 
043456 
043460 
043462 
043464 
043466 


11-AUG-76 00:00 


001422 
005363 
001017 


016305 


146437 
052765 
020537 


001002 


005037 
004777 
062703 


005204 
022704 
001344 
012637 
012602 
012603 
012604 
01260* 
000207 


001540 


001520 
001510 


000100 
001462 


001462 
136016 
000002 
000010 


177776 


001506 
000014 


582 
6$3 


20$% 


BEQ 
DEC 
BNE 


BICR 
BIS 
cwPp 


CLR 
JSR 
ADD 


Inc 
cup 
BNE 
MoV 
wov 
nov 
MoV 
nov 
RTS 


MACY11 30€1046) O1-CEC-77 14:15 PAGE 166 
*WATCH-DOG TIMER 


6$ 
We DPV(R?) 
6$ 


PBLET(R3 DRS 


200, GO TO WERT ORIVE 

SDECREMFET DRTVE COUNT 

31F BOT TIME CUT, GC TO 

3 WERT DRIVE 

SLOAD ADDRESS OF PARAMETER 
BLOCK TABLE FOF INDEXING 


INTPSECR4),W.TIME 3PESET TIPIBG IBDICATCR FCR DPIVE 
SCHDTO,P.PRSTCRS) ZSET COMMAND TIPE OUT 


RS, 0.WATT 
58 


O.WAIT 
PC, RA. APNE 
#2,R3 


(SP)¢,PS 
(SP)e,82 
(SP )¢,R3 
(SP)o,R4 
(SP )o,R* 
ec 


SCHECE TF DRIVER IS WAITING FOR 
3 CCHMARD CCPPLETICH 

3¥O, DO BOT ALTER WAITING FOR 

3 COMMAND COPPLETICNH 

SCLEAR WATT FOR CCMPARD COMPLETICE 
SBRABCH TC ERRCR BOUTINE 

34DD 2 TO INDEX CP ORIVE TIPES 

3 AND PARAWPETER BLOCK ADDRESSES 
STECEFRERT TACEX CF DRIVE HASE 
SCHECE IF ALL DRIVES ARE TESTED 
380, CHECK WEXT ORIVE 

sRESTCRE PSW 

sRESTICHE R2 

sRESTORE P3 

SRESTORE R4 

SRESTORE RS 

sPETURN 


SE@ 0196 


4 tS 





q 

REG11/RRO6 PERFORMANCE EXERCISER MATNDEC DZR6P-P MACY11 30(1046) O1-CEC-77 14215 PACE 169 

DZR6PB.P11 11-AUG-76 00:00 *QK06 INTERRUPT SERVICE ROUTINE SEQ 0191 t 
7550 eSBTTL *REOG INTERRUPT SERVICE POUTINE P 
oven JP SPA agaeaeseagaenengagssAanagnagaasaeaes IIII 
7553 3* 
71554 3* THIS ROUTINE WILL SFRVICE ALL RFO6 THTERSUPTS. < 
7555 hd 
1556 3* UPON RECEIVING AN INTERRUPT, THTS ROUTINE WILL 
7557 3* PERFORM ORE OF THE FOLLOWIBC SERVICES: « 
7558 3* 
7559 3* 1.) SERVICE PORT WAS SEIZED BY OTHER PORT 
71560 3* 2.) SERVICE DRIVER TS WAIT FCR CCHNABD CCPPLETICH | 
7561 3* 3.) SERVICE POSITIONING COMPLETION 
7156? 3* 4.) REQUEVE COMMAND IP DRIVE WAS RELEASED 
7562 3* FOR THE QUEVED RKO6 DRIVER. q 
71564 3* 5S.) IF WO SERVICE IS REQUIRED, THE CCPNAND WILL BE ISSUEC 
1565 3* FOR THE QUEUVED RKOG DRIVER. 
1566 3° q 
71567 3* TAREE LINKS ARE PROVIDED TC THE DRIVING PRCCRAN. 
7568 3* THEY ARE: 
7569 3* € 
7570 3 le) AsWORW ADDRESS OF NCRPAL RETURN (SUCESSFUL CCHPLETICB CF COPRDBT) 
7571 3° 2.) A-ABNL ADDRESS OF ABBORMAL PETURN (USSUCESSPUL COMPLETION OF COPPABT) 
1372 33 3.) A-CONT ADDRESS OF CONTROL ERROR RETURS « 

573 ; 

71574 3* FOR NORMAL AND ABNORMAL RETURNS, THE ADDRESS OF TRE APPRCPRIATE 
1575 3° PARAMETER BLOCK WILL BE IW RS. < 
7576 3* 
7877 3° FOR THE CONTROLLER ERRCR PETORN, THE LCCATICH E.CONT CORTSINS 
7578 3* THE REASON FOR THE CONTROLLER ERROR. « 
7579 3* 
7580 3* ROUTINES USED: 
7581 3* C.OPT (QUEVED ONLY) <q 
71582 3* Q.PUSH (QUEUED ONLY) 
7587 3* Q.R¥OV (QUEUED ONLY) 
71584 3* R.CONT (SEQUENTIAL CALY) <q 
7585 3* Ro WORM (SEQUENTIAL ORLY) 
7586 3* R.APWL (SEQUENTIAL ONLY) 
7587 32* 1.CSTS ¶ 
7588 3* 1-STAT 
7589 3* I.1Ssv 
7590 3” 1.CCLR q 
71591 3* 
7592 FP TAAAA AAA AKA AAAAAAAARASHAAKRAAAAAAAAT HAAR ARAARAAAARARAAAAAARAAAAAAA Py 
7593 
71594 043470 010546 IeENTR: MOV R5,-(SP) STORE RS ON THE STACK 
7595 043472 010446 MoV R4,-(SP) STOKE R4 CW THE STACK 
71596 043474 010346 MOV R3,-(SP) STORE P3 OW THE STACK q 
1597 043476 010246 MOV R2,-(SP) #STORF R2 ON THE STACK 
7598 043500 010146 mov R1,-(SP) STORE Rl OR THE STACK 
7599 043502 010046 MoV RO,-(SP) STOKE RO CN THE STACK <q 
7600 043504 013702 001444 MOV REBAS, R2 3LOAD R2 TO ADDRESS RKOE REGISTER 
7601 043510 016737 000010 001410 MOV RKCS2(R?),T.CS2 sSTORE CS? 
7602 043516 032737 001000 001410 BIT g¥DS,7.CS2 CHECK TE MOLTIPLE DRIVE SELECT <q 
7603 043524 001407 BEQ is 380, CONTINUE PRCCESSING 
7604 043526 052737 100000 001460 BIS HE.MOS,E.CONT 3SET MULTIPLE CRIVE SELECT 


7605 043534 004777 135716 JSR PC, @A.CONT sREPCRT ERROR 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
11-AUG-76 00:00 


DZR6PR.P11 


7606 
7607 
7608 
7609 
7610 
7611 
7612 
7613 
7614 
7615 
7616 
7617 
7618 
7619 
7620 
7621 
7622 
7623 
7624 
7625 
76 26 
7627 
7628 
7629 
7630 
7631 
7632 
7633 
7634 
7635 
7636 
1637 
7638 
71639 
7640 
7641 
164? 
71643 
71644 
71645 
1646 
71647 
71648 
71649 
1650 
7651 
7652 
7165? 
71654 
7655 
7656 
7657 
7658 
1659 
1660 
71661 


043540 


043544 
043550 
043552 
043554 
043560 


043562 
043566 


043572 


043600 
043602 
043606 
043612 
043614 
043616 
043622 
043630 


043634 
043642 


043650 


043652 


043660 
043662 


043670 
043676 


043700 
043706 
043712 


043716 
043722 
043726 
043730 
043736 


043742 
043746 
043754 
043760 


043764 
043766 


000137 


105737 
001410 
100403 
105037 
000504 


105037 
000137 


032737 


001415 
013704 
042704 
010403 
006303 
016305 
016237 
000137 


016237 
032737 


001050 


032737 


001007 
016237 


032737 
001407 


052737 
004777 
000137 


013703 
042703 
006303 
013763 
016305 


004737 
052765 
005037 
004037 


046714 
000137 


046214 
001502 


001502 
001502 
044740 
010400 


001410 
177770 


001520 
000000 
044142 


000012 
000001 


164000 


000014 


125700 


000010 
135544 
046214 


001410 
177770 


001474 
001520 


051126 
010000 


001462 
046232 


046214 


001410 


001406 


001426 
001426 


001410 


001424 


001424 


001460 


001540 


000014 


*RKOG INTERRUPT SERVICE ROUTINE 


6$: 


7$: 


10$: 


11$: 


JP 


TSTB 
BEQ 
BY 
CLRP 
BP 


CLRB 
J¥P 


BIT 


BEQ 
MOV 
BIC 
MOV 
ASL 
MOV 
MoV 
J¥P 


nov 
BIT 


MACY11 30(€1046) 


I-RTRE 


I.ISRL 
6$ 

5$ 
I-ITSRL 
1.100 


I.ISRt 
I.ATT® 


@REDIUFE,T.CS2 


7s 

T.CS2,R4 
#°C<DRUMSED,R4 
R4,°3 

R3 

PRLET(R3) KS 
RKCS1(R2),T-CS1 
I-ERRC 


REOS(R2),7.0S 
#DRA,T.DS 


O1-CEC-77 14315 PAGE 1706 


sPETURG 


SCHECK ITF IMTERRUPT OR RELEASE 
2u0, CHECK IF DRIVE AVAILABLE 
sCHECF IF RELEASE COMMAND 
sYES,CLEAR FLAG 

SCOMTIBUE PRCCESSTIAGC INTERRUPT 


sCLEAR PFLAG 
260 PROCESS DRIVE ATTENTIONS 


SCHECK PCR RCH-EXISTENT DRIVE CF 

3 UNIT FIELD ERRCR 

3RO, WATT FOR DUAL ACCESS ISTERRUFT 
sLOAD R4 POR DRIVE RUMBER 

sFEEF DRIVE BITS 

SSTORE DRIVE BUPBER FOR INDEX 
sMULTIPLY BY 2 

SSTOKE PARAPETER PLCCK ADDEFSS 

SLOAD TEMPORARY CS1 FOR STATUS FPEFOPT 
SREPORT ERROR 


sSTOKE STATUS KEGISTER FOR COMP AGISCH 
sCHECR If DRIVE SEIZED BY OTHER 

3 PoRT 

3G, CONTINUE FRCCESSING TNTERRUFT 


SCHECK IF ANY DATA TRANSFER ERROR EXISTS 
SOL TIWCEIOPE IRE, T.CS2 


BIT 


10$ 
RKER(R2), TER 


sTISDICATE ERECR 
sSTORE ERROR REGISTER 


CHECK FOR DATA TRABSFER ERGO TYPE FRECK 
SOCK IOPIIWLEICOEIRURCIBSETECH, T.EP 


BIT 


11$ 


#E€.UDAT,E.CONT 
PC, @A.CONT 
I.-RTRA 


T.CS2,R3 
8°C<DRVPSF>,R? 
R3 
woMIN,W.DPVCR3) 
PBLET(R3),R5 


PC,Q.RMCY 


340, WATT FOR RELEASE OF PKOG DRIVE 


sSET OMEXPECTEC CATA TYPE ERROR 
SPEPORT ERROR 
SRESTORE RECISTERS 


sSTOKRE RKCS2 PCR CRIVE HUMBER 
sSTRIP OFF JUNK 
sPVULTIPLY INCPX BY 2 
SWAIT OWE MIBOTE FOR RELEASE 
SLOAD RS WITH PARAMETER 

RLOCK ADDRESS 
SPEMCVE PARAMETER BLOCK FRCP 
3 COMMAND TMITIATION QUEUE 


SDRVS7D,P.PRST(RS) 3SET DRIVE SEIZED IN THE 


O.wWAIT 
RO, 1.CCLR 


1.RTRNW 


3 PROGRAW DRIVE STATUS REGISTER 
sCLEAP WATT FCR CCMMAND COMPLETIC®S 
sCLFAR CONTROLLER 

sERRCR RETURD 

260 RESTORE FECISTIEES 





S/S 





ro 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZRG6P-B 
OZR6PB.P11 


7662 
7663 
1664 
71666 
71666 
71667 
7668 
1669 
7670 
7671 
7672 
71673 
1674 
7675 
7676 
7677 
7678 
7679 
7680 
7681 
7682 
7683 
76864 
7685 
7686 
7687 
71668 
7689 
7690 
7691 
7692 
71693 
7694 
7698 
71696 
7697 
7698 
71699 
7700 
7701 
71702 
7703 
71704 
71705 
7706 
7707 
7708 
71709 
7710 
7711 
7712 
7713 
7714 
7715 
7716 
7717 


043772 
043776 


044004 
044010 


044014 
044016 


044020 
044024 
044026 
044030 
044036 
044040 


044044 
044050 
044054 
044062 
044070 
044076 
044100 
044106 
044114 
044116 
044122 


044126 


044134 
044140 


044142 
044150 
044154 
044162 
044170 
044174 
044176 


044204 
044706 
044212 
044214 
044222 
044226 
044230 
044236 
044240 


044246 


11-AUG-76 


013705 
001002 


000137 


013704 
042704 


010402 
006303 


126504 
001401 
000000 
122765 
001002 
000137 


005037 
005063 
146437 
016237 
032737 
001021 
016237 
136437 
001004 
004777 
000137 


052765 


004737 
000405 


013765 
004737 
016 765 
016265 
004037 
046214 
032765 


001046 
004037 
046214 
112737 
004037 
046714 
136437 
001407 
052737 


004777 


001462 


044740 


001410 
177770 


000164 
044400 
001462 
001540 
001510 
000000 
100000 


000016 
001510 


135330 
046214 


000010 
046664 
001406 
046706 
00003? 
000030 
046232 


010400 


046770 


000005 
046314 


001510 
000020 
135204 


000001 


001506 
001406 
001406 


001422 
001423 


000014 


000016 
00006? 
000060 


000020 


001406 


001423 
001460 


MACY11 30(1046) O1-DEC-77 14:15 PAGE 171 


*RKOG INTERRUPT SERVICE ROUTINE 


2$% 


10$: 


15$: 
I.ERRA: 


I-ERRC?: 
TeERRS 


JvP 


nov 
BIC 


nov 
ASL 


cuee 
BEQ 
HALT 
Cres 
BRE 
JMeP 


CLR 
CLR 
BICcB 
mov 
BIT 
BRE 
nov 
BITB 
BWE 
JSR 
JMP 


BIS 


JSR 
BP 


MoV 
JSR 
MOV 
“cv 
JSR 
I.RTRE 
BIT 


BNE 
JSR 
I.kTRN 
MOVB 
JSR 
I.RTRW 
BITB 
BEQ 
BIS 


JSR 


O.WAIT,RS SLOAD PARAMETER BLOCK ADDRESS INTC RS 
2s 3TS COMMAND BAITIBG PRUCESSTING 
3 YES, OC PECCESSIBG 
I. ATTR 380, PROCESS PTTERTION 
T.CS2,R4 SSTORE RKCS2 FGR CRIVE BUPBER 


@°CCDORUNSF>, 824 sMASK COT UNNECESSARY BITS 


R4,°3 SSTORE ORIVE BUPBER FOR IRDEX 

R3 sMULITELY BY 2 PCR INDEX 

P.DRVNCRS ),R4 sCHECK IF DRIVE BUMPER IS EXPECTEC 
3$ sYES, CONTIRUE 


300, DETVER ERECE 
#POALAD,P.CMNDCRS) SCHECK IP PEAD ALL HEADERS 


10$ 380, EXECUTE BORMAL DATA TRANSFER 
I.HDAL 260 EXECUTE SPECIAL HEADER SEQUEBCE 
O.WAIT SCLEAR WAIT FOR CCMPAND COMPLETICH 
W-DRV(R?) sCLEAR WATCR-DCCG TIVE 


IMTPSK(R4),W.TIME 3RESET TIMING CR THIS DRIVE 
RECS1(R2),T.CS1 ZSTORE COMMARD AND STATUS REGISTER 1 
@CERR,T.CS1 sCHECK TF COBTROLLER ERROR 

Ie ERRC 3YES, PRCCESS ERGCE 
REASOF(R2),T.ASOF ZSTORE ATTERTICH SUMMARY 
INTMSK(R4),T.ASOF*¢] 3CHECK IF DRIVE ATTEMTION SET 


15$ sYES, REPORT ERRCR 
PC, @A.NORP STMDICATE MCKPAL FETURD 
I.RTRA sPESTORE REGISTERS 


GUEXATT,P.FRST(RS) 3SET UNEXPECTED ATTENTION 


PC,1.CSTS sSTCRE CORTPOLLER STATUS 
I-ERR SSTORE PATTERW AND POSITION IRFORPATICH 


T.CS1,P-CSIC RS) ;CET FRRCR RECS 
Pc, 1.CST1 3CET REST OF CONTROLLER STATUS 
RRECPT(R2),P.EPAT(RS) »STORE ECC PATTERR 
RKECPS(R2),P.EPCS(RE) sSTORE ECC PCSITICH 
RO, I.CCLR 3CLEAR CONTPCLLER 
ZERROR RETURD 
@NEDIUFE,P.CS2(R5) 3CRECK If IT BAS KON-EXISTENT CRIVE Ch 
3 URTT FIELC ERSCK 
5$ 3YES, REPORT ERRCR 
RO, 1.STAT SGATHER DRIVE STATUS 
ZERRCR PETUPR 
#DR.CLR,T.CS1 ;LOAL COMMAND 
RO, 1.1SSU sTSSUE DRIVE CLEAR 
ZERRCR RETURN 
INTMSK(R4),T.ASCROL ZCHECK IF ATTERTICN RESET 


2$ 3WO, INDICATE OPIVE ERRCR 

@E.CLAT,E.CONT sZSET ATTENTION DID BOT RESET 
3 WITH CLEAR 

PC, @A.COKT SPEPCRT COMTSCLLER ERRCE 


SEC 0193 


KLS™ 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


DZR6PB.P11 


7718 
7719 
7720 
7721 
7722 
7723 
7724 
7725 
7726 
7727 
7728 
7729 
7730 
7731 
7732 
7733 
71734 
7735 
71736 
7737 
7738 
7739 
7740 
7741 
7742 
7743 
1744 
71745 
7746 
7747 
7748 
71749 
7750 
7751 
7752 
7753 
7754 
7755 
7756 
7757 
7758 
71759 
7760 
7761 
7762 
1763 
7764 
7765 
1766 
71767 
7768 
7769 
7770 
7771 
7772 
7773 


044252 


044256 
044264 
044266 
044274 
044302 
044304 
044312 
044316 


044322 
044330 
044332 
044340 
044342 
044350 
044356 
044364 


044370 
044374 


044400 


044406 
044414 


044416 
044422 
044430 
044434 
044442 
044446 
044452 
044454 
044460 


044464 
044472 
044500 
044502 
044506 
044514 
044520 


044524 
044530 
044534 
044540 
044544 
044550 
044556 
044564 


11-A0G-76 
000137 


032737 
001403 
052765 
032737 
001407 
052737 
004777 
000137 


032765 
001017 
032737 
001413 
05276£ 
156437 
013763 
000137 


004777 
000137 


016237 


032737 
001423 


005037 
146437 
005063 
013765 
004737 
004037 
046214 
004777 
000137 


016537 
136437 
001411 
005037 
146437 
005063 
000137 


013701 
016221 
016221 
016221 
010137 
016237 
032737 
001056 


00:00 
046214 
040000 


000040 
001000 


002000 
135140 
046214 


000020 
020000 


020000 
001510 
001472 
046714 


135060 
046214 


000000 
100000 


001462 
001510 
001540 
001406 
046706 
046232 


134774 
046214 


000016 
001510 


001462 
001510 
001540 
044134 


001476 
000024 
000024 
000024 
001476 
000010 
100000 





001432 


000014 
001434 


001460 


000014 
001432 
000014 


001506 
001540 


001406 
001406 


001506 
000016 


001422 
00142? 


001506 


001410 
001410 


MACY11 30€1046) O1-DEC-77 14:15 PAGE 172 


*RKOG INTERRUPT SERVICE ROUTINE 


2$3 


S$: 


10$: 


«SBTTL 
I.HDAL: 


S$: 


7$3 


Jue I-RTRS 3GO RESTORE REGISTERS 

BIT §S.DSC,T.PR? SCHECK TP DRIVE STATUS CHANGE CLEARED 
BEQ 3$ sVYES, CHECK FAULT 

BIS GORVDSC,P.PRST(RS) SSET OSC DID BOT CLEIR 

BIT — sCHECE If DRIVE PARITY ERROR 

BEQ 380, ITSDICATE ABBCRPAL TERNIBATICS 
BIS #2. 0PAR,£.cOBt sSET ORIVE PARITY ERROR 

JSR PC, @A.CONT STIEDICATE COBTROLLEP ERFOR 

J"P [RTRs sRETURG 

811 @DRVHRD,P.PRSTCRS) sCHECK IF FARC DRIVE ERROR 

BRE 10$ sYES, GO REPORT ERROR 

BIT @S.PIP,T.MR2 SCHECK If DRIVE IS CYCLIC von 
BEQ 10$ 380, REPGRT ERROR 

81S @E.UNLD,P.PRST(US) ZSET ORIVE ORLCADING 

BISsB INTHSE(R4),U.TIME Z3SET UP & SECOBDS FOR 

nov W.BSEC,U.DRVCR3) 3 ORIVE TO CYCLE UP 

J¥P I-RTRA 360 RESTORE REGISTERS 

JSR PC, @A. ABEL 260 REPORT ERRGR 

JMP I.RTRP 260 RESTORE KECTSTERS 


*RFAD ALL HEADERS IMTERGUPT SECUERCE 


nov RKCS1(R2),T.CS1 sSTORE CS1 TO CRECK CONTROLLER 
3 §©6—ERROR 
BIT @CERR,T.Cf1 SCHECY TF CCATECLLER ERECR 
BEQ 58 380, CHECK FOR ATTERTIOP 
CLR O.WAIT SCLEAR WAITTIEC POR COMMARD COPPLETE 


BIce INTPSE(R4),W.TIME ZRESET TIPIBG CR CRIVE 
cCtR U.DRYCR3) sCLEAR TIVE CUT COURT 
nov T.CS1,P.CSI(R2S) sSTORE ERROR RECS1 


JSR PC, 1.CST1 SSTORE COMTRCLLER RECTSTERS 

JSE RO, 1.CCLR sCLESR CONTROLLER 

I-RTRY SERROR RETURN 

JSR PC, @A. ARUL STUDICATE ERROR RETURN 

JvP I-RTRE SRESTCRE RECISTERS 

MoV RKASOP(RS),T.ASOF sSTORE ATTERTIGH SUMMARY 

BITB INTMSK(R4),T.ASOF*1] ZCHECK TF DRIVE ATTESTICN IS SET 
BFG 7$ 3RC, CHECK IPF BEAT ALL READERS 

CLR O.WAIT SCLEAR WAITIGG PCR COMMAND COPPLETION 


BICB INTMSE(R4),W.TIPE ZRESET TIPING CH ORTVE 


CLR @.DRV(R3) sCLEAR TIPE CUT CCUST 

JMP I.ERRA 3CO KEPORT ERPCE 

wov HDR.AD,R1 sCET WATB MEMCRY ADDRESS 

MoV REDECR2),CR1)* sCET FIRST WCRO CF HEADER 

nov REDB(R2),(R1)¢ sCET SECOND BORD CF HEADER 

MoV RFDBCR2),(R1)* sZCET THIRD WORD CP FEADER 

nov R1,ROR.AD SSTOKE ADDRESS FCR BEXT HEATER 
MoV RECS2(R2),1.CS2 sSTCKE CS2 TC CRECK FOR DATA LATE 
BIT @DLT,T.CS2 sCHECK FOR DATA LATE 

BNE 35$ 3YES, REPORT ERRCR 


SEG 0194 


Li" 








RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-R 


DZR6PB.P11 


7774 
7775 
7776 
7777 
7778 
7779 
7780 
7781 
7782 
7783 
7784 
7785 
7786 
7787 
7788 
7789 
7790 
7791 
7792 
7793 
1794 
7795 
1796 
1797 
7798 
7199 
7800 
7901 
7902 
7803 
7804 
7805 
706 
7807 
7808 
7809 
710 
Tell 
7812 
7A13 
7814 
7815 
7816 
7817 
781° 
7819 
7820 
7821 
7822 
7823 
7824 
7925 
7826 
7827 
7828 
7829 


044566 
044572 
044574 
044600 
044604 
044612 
044620 
044626 
044632 
044634 
044642 
044646 


044652 
044660 
044666 
044674 


044702 
044710 
044716 


044722 
044730 
044734 


044740 


044746 
044754 


044756 


044764 
044766 


044774 
045062 


045004 
045012 
045016 


04502? 
045026 
045032 
045034 
045036 
045044 
045050 


11-AUG-76 


005337 
001027 
005037 
005063 
146437 
012762 
112737 
004037 
046214 
013765 
004777 
000137 


016562 
01656? 
116565 
042765 


112768 
016562 
000137 


052737 
004777 
000137 


016237 


032737 
001444 


032737 


001007 
016237 


032737 
0014067 


052737 
004777 
000137 


013704 
042704 
010403 
006303 
146437 
005063 
016305 


00:00 
001500 


001462 
001540 
001510 
000003 
000001 
046314 


001434 
134604 
046214 


000002 
000004 
000007 
165777 


000125 
000016 
046214 
000400 


134522 
046214 


000000 
100000 


164000 


000014 


125700 


000010 
134440 
046214 


001410 
177770 


001510 
001540 
001520 


001506 
000026 
001406 


000056 


000020 
000006 
000017 
000016 


000016 
000000 


001460 


001406 


001406 


001410 
001424 


001424 


001460 


001*06 


MACY11 30(1046) O1-CEC-77 14:15 PAGE 173 


*READ ALL HEADERS INTERRUPT SEQUENCE SEC 0155 
DEC HDOR.CT SDECKEMFRT HOPBER CF READER YFT TC PEAD 
BNE 25$ 21F BON-ZERO, CO ISSUE WEXT READ PEADER 
CLR O.WAIT SCLEAR DRIVER MAITING FOR COMPARD COMPLETICE 
CLR W.DRVCR3) SCLEAP TIME CUT CCUBT FOR THIS DRIVE 
BICB IRTMSKCR4),W.TIPE CLEAR WATCH OCC TIME OW THIS CRIVE 
MOV #3, RKMR1CR2) SLOAD MAINTEBANCE REGISTER FOR SECTOR COURT 
MOvB #D0R.SEL,T.CS1 SLOAD SELECT COCPHAND 
JSR RO, 1T.1SSU sGET SECTOR CCURT 
I.RTRN ZERROR PETURD 
nov T.MR3,P.B11(R5) ZsLOAD SECTOR COUNT 
JSR PC, @A.HORP STNDICATE NORPAL TERMIBATICR 
JMP I-RTRH SRESTORE RECISTERS 
25$: mov P.CYLNC(RS ),RKDCYL(R2) ;LOAD CYLINDER ADDRESS RECISTER 
nov P.SECT(RS),RKDACR2) sLOAD SECTCR AND TRACK 
nOvVB PoCSIRC(RS),P.CSI¢1(R5) sSTORE BITS @-15 OF CS1 
BIC S°CCCOTICFMTD,P.CSICRS) sCLEAR ALL BITS EXCEPT FORMAT ARC 
3 DATIVE TYPE 
wove @PDHEAD,P.CSICR*®) sSTCRE COMPARE ISSUET 
MoV P.CSICR5S),RECSIC(R2) ZISSUE GEAD READER 
JMP I-RTRR SRESTORE REGISTERS 
35$: BIS @E£.0LT,£ CCRT 3SET DATA LATE WHILE UNLOADING REPCER 
JSR PC, @A.CONT sPEPORT ERROR 
JvP I-RTRN SRESTORE REGISTERS 
eSBTTL *DRIVE ATTENTION SCARNER 
[.ATTH: MOV RECSICR2),T.CS1 ZsSTORE COPMMARD ABD STATUS 
3 §6>REGISTER 1 FOR COMPARISCE 
IT #CERR,T.CS1 sCHFCR TF COBTECLLER ERPOR CCCURKED 
BEQ 5$ 3NO, CHECK IF ATTENTION 
G SCHFCK IF ANY DATA TRARSFER TVPE FRRCK FXRYISTS 
bIT SOLTIWCEIUPEINEM,T.CS? 
BWE 1$ STMDICATE ERKCR 
nov RFEPC(R2),7.EK sSTCKE FRRGCP RECISTFR 
3 CHECK FOR DATA TRANSFER ERROK TYPE 
BIT SOCK IOPIIWLEICOFSHVPCIBSETECH,T.EP 
BEG 2s 3NC CATP TRARSFER ERKOR 
1$3 BIS #E.UDAT,E.CONT jSET UMEXPECTEC CATA TYPE ERROR 
JSk PC, @A.CONT SPEPCRT ERRCE 
J¥P I.RTRN SPESTORE REGISTERS 
2$3 vov T.CS2,R4 SSAVE CS2 FCK REGISTER SUMBER 
BIC O°CCDRUMSF>, K4 ZSTPIO CRF JURK 
MOV R4,R3 ZSTORF ORIVE RUPBER IW RZ 
ASL R? SPULTIPLY DPIVE BUMPER PY 2 


Bice INTMSECR4) W.TIME 3CLEAP WATCR-CCCG TIMER FCR THRIVE 
CLR w.0P¥C(R3) SRESET WATCH DCC TIPE 
wovV PPLFT(R7) RS SSTOKE PACAVETER BLCCK ADDRESS Ib &5 








’ 


RF6LI/RFOSK PEPFORMANCE EXERCISER PATHDEC DZPEP-* 
11-A0C-76 00:00 


OZk6PS.P11 


7830 
7°31 
783? 
7833 
7834 
TAS 
7°36 
7#37 
7639 
7939 
7840 
7e41 
7842 
7843 
7944 
7845 
7846 
7847 
7848 
7849 
7950 
78651 
7852 
7853 
1°54 
7es5* 
7956 
7°57 
7858 
7859 
7°60 
7°61 

7°62 
7863 
7°64 
7865 
7866 
7867 
7868 
7869 
7870 
7871 
7972 
7873 
7°74 
76075 
7874 
7877 
7878 
7879 
7880 
7881 

7882 
7883 
7964 
7985 


045054 
045062 


045066 
045074 
045076 
045102 


045106 
045114 
045120 
045122 
045130 
045134 


045140 
045142 
045150 
045152 
045154 


045156 
045160 
045162 
045166 
045174 
045176 


04570? 
045202 
045210 
045212 


045216 
045224 
045230 
045236 
045242 
045744 
045252 
045260 
04526? 


045264 
045272 
045300 
045302 
045310 


045312 
045320 
045324 
045326 


042765 
000137 


032737 
001004 
004737 
000137 


016737 
405737 
001007 
052737 
004777 
000137 


005004 
136437 
001002 
005704 
000772 


010407 
006303 
616305 
03276* 
001402 
000137 


032765 
001402 
000137 


042765 
005062 
112737 
004037 
046214 
013765 
032765 
001401 
000473 


013765 
032765 
001004 
052765 
000460 


112737 
004037 
046214 
013765 


000006 
044142 
040000 


051240 
046214 


000016 
001423 


000002 


134722 
0462714 


001510 


001520 
010000 


046026 


020000 
045729 
000002 
000026 
000001 
046314 


001434 
000200 


001432 
040000 


004000 
000005 
046314 
001422 


001422 


001460 


001423 


000014 


000014 


001406 


00004? 
000042 


000040 
000040 
000014 
001406 


00003? 


PACYI1 30€1046) O1-CFC-77 14215 PACE 174 


*DRIVE ATTENTION SCA*NER 


352 


782 
6s: 


1052 


11$: 


12$: 


13$: 


CLEPR DPIVE PNSITICHING AND CEIVE POSITICHED FOP DATA TeARSFER 
18 PKNGCPAW DEVITE STATUS PECISTFR 


Bic 


ODRVPOSIORVPDT,P.PRST(R) 

1. Loac 300 BEPCRT ERPCO 

§01,7.CS1 sCHECE TF AWY OPIVE ATTERTICH 

6$ 3VES, PRCCESS INTEREUPT 

PC, C.0PT SC ALL COMPANL CPTIPIZER 

1.RTRN PRESTORE RECISTERS 

PRASOF(R2),T.ASCR sSTORF ATTENTICH SUPHORY 

T.aSOFel sCHECE TF ANY ATTENTIONS SET 

7$ sVES CO PROCESS INTERRUPT 
@F.NUDT,E.CONT pSET WO ATTERTICA IF ATTENTION SUPPARY 
PC, @A.CORT 3CC BPPCET FRECE 

1.kTRN 3CO RESTORE REGISTERS 

ka ;CLEAW ORTVE BUPBER 
INT™SE(P4),TASCROL sCHECK JF ATTENTION OF THIS CEIVE 
9$ sYES, PROCESS INTFREUPT 

Ra PIRCKERERT CETVE RUPBFR 

8s SCHECK ATTENTION Ch NEXT DRIVE 

R4,P3 gSTORE ORTVE BUPEER 

R3 SPULTIPLY DOFIVE BONPER BY 2 


PPLFT(R3),KS SSTOKE PAPAPETER PLOCK SDDRESS 
SDRVSZD,P.PRST(PS) sCHECK IF ORTVE WAS SETZFD 
10$ SWC, PRCCFSS BCHRAL ATTESTICH 
1.C0AaL SPROCESS THE PELESSE OF OPIVE 


@F.UNLD,P.PPSTC(C PS) ZChFCR TF CPIVE UNLCADIBG 


11$ 3¥O, CONTINUE 

1.U"LD SSEPVICE ORTVE Th PCSTTIUN AFTER FRROP 
GORVPOS,P.PPST(RS) ZPESET DRIVE FOSITICHING 

RFMRICR2) SCLEAR PATNTENANCE REGISTER 1 
@0R.SEL,T.CS1 sLOAL COMPA"D 

RO, 1T.1SSU SSELECT OPIVE BITH PTTERTICN FICE 


ZERRCR RETUPR 
T.MP3,P.B00C(RS) ZSTORF STATUS BYTE OO MFSS B 
@S.FLT,P.PCOCRS) sCHECK IF CHIVE FAULT 
12$ 3NO, CHECK FCR DRIVE STATUS CHANCE 
1.AERR sPROCESS FRECP 


TeMP2,P.A00(R*) ZSTORE MATNTENANCE FEGISTER 2 
#S.DSC,P.A00(RS) ZSCHECK FOR DRIVE STATUS CHANCE 


13$ VES, PPCCESS DPIVE STATUS CHARCE 
@NODSC,P.PRSTCRS) ZSET 8O DRIVE STATUS CHANCE 
1-AERR SPROCESS ERROR 


@OR.CLR,T.CS1 sLCaC CChPARE 

RO, 1.1SSU SCLEAP NRIVE STATUS CHANGE 
sFRPOR RETUN 

T.ASOP,P.ASOF( RS) ZSTORE ATTERTICH SUMMARY 


sec ise 


Ale 








RE61LL/REOG PERFORMANCE EXFRCISEP MATHDEC DZP6P-8 


D7REPR.P11 


7886 
7887 
798" 
7889 
7990 
7891 
7992 
7893 
7894 
1895 
7996 
7297 
7°98 
7999 
7900 
7901 
7902 
7903 
7904 
7905 
7906 
7907 
790" 
71909 
7910 
7911 
7912 
7913 
7914 
7915 
7916 
7917 
7918 
7919 
e@ 7920 
7921 
7922 
7923 
7924 
71925 
1926 
7927 
7928 
7929 
7930 
7931 
7932 
7933 
7934 
e 7935 
1936 
7937 
€ 7938 
7939 
71940 
€ 7941 


045334 
045342 
045344 


045352 
045356 


04536? 
045370 


045376 
045400 
045406 


045410 
045416 
045422 


045430 
045432 


045436 


045442 
045446 


045452 


045460 
045466 
045472 
045500 
045506 
045514 
045522 
045530 
045536 
045544 
045552 
045560 
045566 
045574 
045600 
045602 
045610 
045614 
045616 
045624 
045626 
045634 
045640 


045644 
045652 


11-AaUG-76 00:00 


13646* 
001407 
052737 


004777 
000137 


013765 
032765 


001404 
052765 
000421 


146437 
005063 
032765 


001004 
004777 


000137 


004737 
000137 


042765 


146437 
005063 
042765 
042737 
053765 
01376* 
013765 
013765 
013765 
013765 
013765 
013765 
013765 
004037 
046714 
112737 
004037 
046214 
136437 
001407 
052737 
004777 
000137 


03276* 
001017 


001510 
000020 


134100 
046214 


001432 
040000 


001510 
001540 
000004 


134014 
046214 


051740 
046214 


001510 
001540 
177741 
000036 
001406 
001410 
001412 
001414 
001416 
001420 
00142? 
001424 
001426 
046770 


000005 
046314 


001510 
000020 
133616 
046214 


000020 


MACY11 36€1046) O1-CEC-77 14:15 PACE 175 


*ORIVE ATTENTION SCANNER 


000040 15$: 
000040 


000014 


001506 16$: 
000014 


17$: 


e SBTTL 
000014 I.AERP: 
001506 


000016 
001406 
000016 
000020 
000022 
000024 
0000 26 
000030 
000032 
000034 
000036 


001406 
001423 


001460 


000014 2S: 


ert 
BEG 
81s 


JSk 


JSK 
Jue 


INTHSFCP4),P.BSCROLCE®) SCHECE TF ATTENTION RESET 
15$ SYES, CONTINUE THTEPROPT PROCESSING 
GE.CLAT,E.CONT SET ATTERTIGR DID BOT PRESET 

WITH OPIVE CLEAR 
PC, @A.CONT sPLac ERECR 
I.-RTRE SRESTORE PECISTERS 


T.MR2,P.A00CRS) JSTORE PATHTERARCE PECISTER 2 
@S.DSC,P.ACOCRS) SCHECK IP DRIVE STATUS CHARGE 
3 66RESET 
16$ SYES, CONTINUE THTEPRUPT PRCCESSIVG 
SDRVOSC,P.PRSTC RS) 3 SPT ORIVE STATUS CHANCE OID BCT caen 


I. AERP 260 PPOCESS EPECR 
INTPSE(R4),W.TIME ZRESET TIPIFG CP THIS OPIVE 
w.DPVC(R3) sCLFAR CRIVE TIPING COURT 


SORVPOT,P.PRST(PS) SCRECK IPF DRIVE TS PCSITIONING 
3 §6©FOR DATA TRARSPER 


17$ SYES, CALL CCPPARD OPTIPIZER 
PC, GA. NCKP SPEPCRT SUCCESSFUL COMMAND 

3 COMPLETION 
I.RTRS SPESTORE REGISTERS 
PC,C.CPT sCALL CCRPARC CPIIMIZER 
1.RTRN SPESTORE RECISTERS 


*ATTENTION ERROR HANDLER 


BIC 


BICR 
CLK 
BIC 
BIC 
BIS 
nov 
mov 
anv 
mov 
“ov 
MoV 
“ov 
mov 
JSit 
I.RTRN 
MOVR 
JSK 
I.RTRN 
BITR 
BFQ 
BIS 
JSR 
JvP 


BIT 
BWE 


GORVPDT,P.PRST(PS) SRESET POSITIONING IN PRCGPESS BECBUSE 
3 OF DATA TRANSFER 
INTPSK(P4),W.TIPE SCLEAR TIPI®G FCR THIS ORTVE 


w.DRYCRI) SPESET WATCH-CCC TIVE 
$177741,P.CSICRS) ;REEP COMMAND ISSUEP 
#36,T.CS1 SFERP CURRENT CONTKCLLEP STATUS 


T.CS1,P.CSI( RS) JPARE GCOD PESSACE 
TeCS2,P.CS2(RS) ZFSTCK® CCHTPCLLFR REGCTSTERS 
T-WCR,P.WCRCRS) 
TBA, P.PAR(PS) 
T.CA,P.PTSC( PS) 
T.DC,P.DCYL( RS) 
T.ASOF,P.ASOF (RS) 
TER, P.ERC(RS) 
T.DS,P.PSCRS) 
RO, 1.STAT SGATHER DPIVE STATUS 
sFRRCR RETURD 
#O0R.CLA,T.CS1 20a0 COMPARD 
RO, 1T.1SSU SCLFAR DATIVE FRECKS 
sERPCR PETURA 
INTWSE(P4),T.ASOFO] ZCHECK TF ATTFNTION RESET 


2s sYES, FLAG DKIVE FRACR 
@F.CLAT,E.CONT ;SET ATTENTICH CIC ACT PESET 
PC, @A.CONT sPEPCRT EPRCK 

I.RTRW ZRESTORE PECISTFES 


@DRVHYD,P.PPST(C RS) ZCHECK IF AHAGE CRIVE FRECE 
10$ 3VYES, RFPCRT ERPCP 


sec ¢1$7 


B% 














RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 WACY11 20€1046) O1-DEC-77 14:15 PAGE 176 
OZR6PB.P11 11-AaUG-76 00:00 *ATTERTICH ERROR HANDLES Se¢ C196 ( 
7942 045654 032737 020000 001432 Bit @S.PIP,T.¥R2 sCHECE Tf DRIVE IS OBLOADING 
7943 045662 001413 BEG 10$ 3"O, REPORT ERROR ( 
7944 045664 052765 020000 000014 ers @E.UNLD,P.PRPST(HS) 3SET ORIVE UNLCATING CUE TC FEECP 
7945 045672 156437 001510 001506 BISs8 INTHSE(P4), WU. TIPE 3SET TIPING OR THIS DRIVE 
7946 045700 013763 001472 001540 nov W.8SEC,W.DRV(R3) LOAD # SECONDS POR CYCLE UP ( 
—*8 045706 000137 046714 Jwe I. aran 20cstoat PEGISTERS 
4 
7949 045712 004777 133536 10$: JSR PC, @A. ABNL SPEPORT ERROR ( 
—* 045716 000137 046214 Jvep I.RTRN SRESTORE PECISTERS 
951 
7952 -SBTTL *ERROR CAUSING DPIVE TC UBLCAD ( 
7953 
7954 045722 052765 020000 000014 I.UNLD: BIS #E.UNLO,P.PRST(RS) SCLEAR DRIVE URLOADING BECAUSE OF ERRCE 
7955 045730 112737 000005 001406 novB #OR.CLAR,T.CS1 jsLOAD If ORTVF CLEAR ( 
71956 045736 004037 046314 JSR RO, T.1SSU 3CC ISSUE OPIWE CLEAR 
7957 045742 046214 I.RTRW ZERROR PETURD 
7958 045744 136437 001510 001423 BITP INTMSE(R4),T.ASOF*1 3CHECK IF ATTENTION CLEARED ( 
7959 045752 001406 BFQ 15$ sYES, CONTIBUE 
7960 045754 012737 000020 001460 nov @*.CLAT,E.CONT 3 3SET ATTERTICH DIC BOT PESET 
7961 045762 004777 133470 JSR PC, @A.CONT sPEPORT ERROR ( 
71962 045766 000512 BR I.RTRB pRESTORE RECISTERS 
71967 ; 
71964 045770 032737 040000 001432 15$: BIT @S.0SC,T.¥h2 sCHEC® TF ORIVE STAUS CRANGE PESET ( 
7965 045776 001403 BEQ 20$ sYES, CONTINUE 
7966 046000 052765 000040 000014 BIS SORVDSC,P.PRST(RS) sSET DRIVE STAUS CHANGE DID NOT CLEAR 
71967 046006 146437 001510 001506 205: BICB INTWSE(R4),W.TIPE ZRESET TIVING CH THIS DRIVE ( 
7968 046014 005063 001540 CLR W.DRYC(R3) sCLEAR TIPE CCURT 
7969 046020 004777 133430 JSR PC, @A. ABEL sPEPOPT ERROR 
7970 046024 000473 BR 1-RTRN SRESTORF REGISTER ( 
7971 
71972 eSBTTL *DUAL ACCESS INTERRUPT HANDLER 
7973 
7974 046026 112737 000001 101406 [.DUAL: MOVR @DR.SEL,T.CS1 j;LOA0 COMMAND 
71975 046034 004037 046314 JSR RO, T.1SSU sSELECT DRIVE 
7976 046040 046214 1. kTRW sO8PCR RETUPA ( 
7977 046042 032737 000200 001434 BIT @S.FLT,T.¥RI SCHECF If DRIVE FAULT 
7978 046050 001402 BEQ 10$ 380, PROCESS IWTERKUPT 
pore 046052 000137 045457 J¥P I-AERP sPROCFSS ATTERTICR ERROR ( 
80 
7981 046056 032737 040000 001432 10: BIT #S.0SC,T.¥R2 sCHECK If DPIVE STATUS CHANCE SET 
7982 046064 001005 BYE 11$ sVES, PROCESS INTERRUPT ( 
7983 046066 052765 004000 000014 BIS #NODSC,P.PRST(RS) JSET "CO DRIVE STATUS CHARGE 
7984 046074 000137 045452 Jvep IAF RP ZPROCFESS ATTENTICE FRECE 
71985 
7986 046100 042765 010000 000014 115: BIC #ORVSZD,P.PRST(RS) shESFT DRIVE SEIZED 
7987 046106 112737 000005 001406 “ove #OR.CLR,T.CS1 sLCAD COMPARC 
7988 046114 004037 046314 JSR RO,1.1SSU sCLEAR DRIVE CSC ( 
7989 046120 046214 I.-RTRW ZERPOP PETURA 
7990 046122 136437 001510 001423 BITR INTWSK(R4),T.ASOF*¢] ;CHFCK ITF ATTENTION KESET 
7991 046130 001406 BFQ 15$ 3YES, CONTINUE ( 
7992 046132 052737 000020 001460 BIS #E.CLAT,E.CONT ;SET ATTENTICK CIC WCT PESET 
7993 046140 004777 133312 JSR PC, 4. cour 2IMD ICATE CONTRCLLER ERROP 
tee 046144 000423 BR I.-RTRN ZRESTORE REGISTERS ( 
95 
7996 046146 032737 040000 001432 155: BIT #S.DSC,T.¥H2 3CKECK TE CRIVE STATUS CHARCE IS STILL fE1 
7997 046154 001405 BEG 20$ 3NO, CO ENQUEUVE CCMPAND Cu ( 





—— — > Mlle Aten ide lin. tdi tity, dem. ddr. 


- 


REG11/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 
O7R6PB.P11 


046156 
046164 


046170 
046176 
046202 
046206 
046210 


046714 
046216 
046220 
046222 
046224 
046226 
046230 


11-aUC-76 


052765 
000137 


146437 
005063 
004037 
001324 
004737 


012600 
012601 
012602 
012603 
012664 
012605 
000002 


045457 
001510 
001540 
050706 


051240 


001506 


*DUAL ACCESS IWTERRUPT HARDLER 


TRTRWS 


BIS 
Jue 


Bice 
CLR 
JSR 
Ccraite 
JSR 


nov 
nov 
MOV 
mov 
nov 
mov 
RTI 


MACY11 30€1046) O1-CEC-77 14:15 PACE 177 


SDRVOSC,P.PRST(RS) SSET ORIVE STATUS CHANCE OTD BCT CLEAE 


SPEPCRT ATTERTICN ERROR 


eee sSTOP TIMING CH THIS ORTVE 


32 


PC,C.0PT 


(SP)o,RO 
(SP)e,R1 
(SP )¢,R? 
¢ SP)o,R3 
(SP )e,R4 
(se doeRS 


sCLEAP WATCH DCG TIPE OF THIS ORIVE 
sPUT PARAPETER BLCCK ADDRESS Ce 

3 COMMSED INITATION QUEVE 

SCALL COMMVARD OPTIMIZER 


sPRESTCRF RO 
SPESTORE Ri 
SRESTORE @2 
sRESTCRE R3 
SPESTORE 24 
SRESTORE RS 
sPETURE 


SEG C199 


Diss 











RF611/R06 PEPFORPAWCE EXERCISER MATNDEC DZP6P-B MACY11 30(€1046) O1-CEC-77 14:15 PAGE 178 

DZR6P.P11 11-AUG-76 00:00 *CONTROLLEP CLEAR ROUTINE SEG 02C0 ( 
6015 -S8TTL ®CONTROLLEP CLEAP POUTINE ( 
—*9 pp eMAPeeeereneereeseaeavenseasanesarseneesenseseneasenarenaeetens 
6018 3* 
6019 3* THIS ROUTINE WILL BE USFD BY THE DRIVER TC CLEAR THE CONTFCLLER ( 
6020 3* AND CHECK IF THE COWTROLLER ERRORS ARE RESET. IF THE ERKCR IS BCT 
6021 3* CLEARED, THE POUTINE AS SPECIFIED IW A.CONT WILL BE CALLEC WITH 
8022 3* E.CCLR SET IN E.CCRT. ( 
8023 3* 
8024 3* REGISTER USE 
8025 3° ——— --- ( 
8026 3* 
8027 je R? ADOGRESS OF RKOG REGISTERS 
802” 3* as ADORESS OF PAPAPETER BLOCR ( 
8029 9* 
8030 z*CALL JSR RO, I-CCLR 
8031 3° <ADDRFSS OF ERROk RETURN ( 
8032 3* RETURR 
8033 3* 
6034 pp eMAeeearasaegesenccsaerseneanesseaeseaesasssensssaseenenansaenes { 
6035 
6036 046232 012762 100000 000000 I.CCLR: nOV @CCLR,RECSICR2) ZCLEAR COWTECLLES 
6037 046240 016237 000000 001406 nov RECSI(R2),7.CS1 sSTORE COMMAND AMD STATUS REGISTER 1 ( 
8038 046246 032737 100000 001406 BIT SCERR,T.CS1 sCHECK TF CONTROLLER CLEAR DID 
8039 3 CLEAR ERFCR 
8040 046254 001407 BEG 5$ sYES, RETURN TO OFIVER PROCESSING ( 
8041 046256 052737 000001 001460 BIS SE.CCLRZE.CONT sSET CLEAR CONTROLLER DID NOT CLEAR ERACK 
8042 046264 004777 133166 JSk PC, @A.CONT SPEPCRT CONTROLLER ERROR 
8043 046270 011000 mov CRE), RO 3SET UP ERRCK KETURS ( 
— 046272 000200 RTS RO sPETURS 
8045 
8046 046274 012767 000100 000000 5$: MOV STE, RFCS1C(R?) 3SET INTERRUPT ENABLE ( 
6047 046302 112737 177777 001*02 move f-1l,T.ISkL ZSET TUTERRUEFT ENABLE ISSUEC 
8048 046310 005720 TsTt CPO)e ZADJUST FOR NORMAL RETURN 
8049 046312 000200 RTS kO sRETURD ( 


F/6e | 








RE611/REO6 PERFORWAWCE FXERCISEP MAINDEC DZR6P-8 MACY11 30€1046) O1-CEC-77 14215 PACE 179 
OZREPS.P11 11-AUG-76 00:00 *COMMAND ISSUED RY DRIVER SERVICE ROUTINE SEQ €3C1 ( 
8050 -SOTTL *COMMAND ISSUED PY OPIVER SERVICE RCOTIAE ‘ 
—33 33 SRARAAASHSAAASSASSAARASARAASAARAARASAARARASARASARARARAASAAEAReAeanenanenase 
80523 3* 
8054 3* THIS ROUTINE WILL ISSUE TRE COMMAND AS SPFCIFIED Im 1.CS1 ( 
8055 3* AND CHECK IF A CONTROLLER ERROR CCCURRED. IF A CONTROLLEF 
8056 3* ERROR OCCURRED, E.CERP WILL BE SET Th E.CONT AND 
8057 3* COMTROL WILL RE TURN CVFR TO THE ROUTINE SPECIFIED BY THE q 
8058 3* ADDRESS IN A.CONT. 
8059 3? 
8060 3* REGISTER USE q 
8061 3* ooe----- --- 
806? 3* 
8063 3* R? ADDDRESS OF RKOG PECISTERS ( 
8064 3* ke ADDRESS CF PAPAPETER PLCCE 
8065 3* 
8066 s*CALL JSR RO, T.1SSU ( 
8067 3* <ADDRESS OF ERROR FETUAND 
8068 3* RETURN 
8069 * ( 
8070 3* ROUTINES OSED: 
8071 3* eo ene en n----- 
8072 3* ( 
8073 3* 1.CCLR 
8074 3* 1.STOR 
8075 3° ( 
8076 3 PFRMAAAAAAAATARAKeHRARAKetanaananaavanasagaaaanaasansaaaassananeaes 
8077 
8078 046714 013746 001406 IeISSU: MOV T.CS1,-(SP) gSTORF COMMARD TSSUED ( 
8079 046320 005037 001410 CLR T-CS2 CLEAR TEWPCKAGY CS2 
8080 046324 116537 000000 001410 MOVB P.DRVNCP5),T.CS2 3LOAD IN DRIVE BUMPER 
8081 046332 013762 001410 000010 mov T.CS2,RKCS2(R7) LOAD ORIVE BROMBER FOR COMMAND ( 
8082 046340 116537 000007 001407 uCvP PeCSIH(PS),T.CS1el sSTCRE BITS 8-15 OF CS1 
8083 046346 142737 177753 001407 BICB #°C<B.CDTIB.CPMT>,T.CS1*1 CLEAR PLE BITS EXCEPT 
8084 '  -g «~PORMAT AND O®IVE TYPE ( 
8085 046354 013762 001406 000000 MOV T.CS1,RFCSICR2) pISSUF CCPMARD 
8086 046362 105762 000000 15: TSTe RECS1(R2) WAIT FOR READY 
8087 046366 100375 BPL is ( 
8088 046370 004737 046536 JSR PC, 1.STOR 360 STORE RFCTISTERS 
8089 046374 032737 100000 601406 BIT @CERR,T.CS1 3CHECF TF CCATSCLLER ERWGR CCCUEBED 
8090 046402 001437 BEG 55 3780, RETURN ( 
8091 046404 032737 001000 001410 BIT avos, 7. 57 zcurcrx TF MULTIPLE DkIVE SELECT 
8092 046412 001406 BEQ 2$ 30, CHECK FOR CTRER CONTROLLER ERRCRS 
8093 046414 052737 100000 001460 Bis #F.MDS,F.CCWT ;SET MULTIPLE DRIVE SELECT FLAG ( 
8094 046422 004777 133030 JSR PC, @A.CONT 3REPCPT CONTROLLER ERRCR 
goes 046426 000440 BR 10$ RETURN ‘ 
96 
8097 ;CHPCF TF ANY CONTROLLER FRPCP TS SFI 
8098 046430 032737 024000 001406 2: BIT gCTOISPAR,T.CS1 
8099 046436 001027 BNE 71$ ( 
8100 046440 032737 176400 001410 BIT QUPELPGFENE™ENECAUPFEWCFIDLT,T.CS2 
8101 046446 001023 BWE 7$ 
8102 046450 032737 131761 001424 BIT SILC IDTVEVEMTFE LECH IP SF PRVRC °COEIDTEIOPI IDCK,T.ER J 
$103 046456 001017 BYE 7$ 
104 
8105 046460 122716 000005 cMPB #0R.CLR, (SP) zcurer TF CLEAR ORIVE ( 
Fv 
< 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-fF 


-) pzr6ps.Pi1 


i —— ———— ———— — — — — — 


8106 
8107 
8108 
6109 
6110 
8111 
8112 
8113 
6114 
6115 
8116 
8117 
6119 
6119 
6120 


046464 
046466 
046474 
046500 
046502 
046510 
046512 
046514 


046516 


046524 
046530 
046532 
046534 


11-AUG-76 00:00 


001003 
052765 
004037 
046530 
012762 
005726 
005720 
000200 


052737 


004777 
005726 
011000 
000200 


000020 
046232 


000100 


001000 
132726 


000014 


001460 





( 
MACY11 30€1046) O1-DEC-77 14:15 PACE 180 
®COMMAND ISSUED BY DRIVER SERVICE RCUTIAE sec 62¢2 ( 
BNE 3$ zuo, DO NOT SET DRIVE HARD FRROR 
BIS SDRVERD,P.PRSTCRS) SET HARD ORTVE ERROR ( 
3$3 JSR RO, T.CCLE 3GC ISSUE A CCATSCLLER cutat 
10$ ZERROR RETURN 
5$: MOV STE, RKRCSIi(R2) sSET INTERRUPT ENABLE ( 
TS? (SP )e PADIUST STACK 
TST (RO)* ZACJUST BO PCR RCHMAL RETURR 
RTS RO sRETURD ( 
75: BIs @E.CERR,E.CONT SET CORTROLLER ERROR DURTEC 
3 DOBTIVER SPRVICING ( 
JSR PC, @A.CONT SREPOPT ERROR 
10$: Ttst (SP )+ SADJUST STACK 
“ov (RO),RO PADJUST RO FOR ERROR RETURS ( 
RTS kO sPETUPE 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
@&/b 
( 





RK611/RKO6 PERFORMANCE EXERCISER MATNDEC OZR6P-8 


DOZR6PB.P11 


6121 
8122 
8123 
6124 
8125 
6126 
8127 
812° 
8129 
8130 
6131 
8132 
8133 
8134 
6135 
6136 
8137 
613" 
8139 
8140 
8141 
8142 
8143 


8144 

6145 

6146 

6147 

6149 

6149 

8150 

8151 

8152 
i 
—— — 


046536 
046544 
046552 
046560 
046566 
046574 
046602 
046610 
046616 
046624 
046632 
046640 
046646 
046654 
046662 


11-AUG-76 00:00 


016237 
016237 
016237 
016237 
016237 
016237 
016237 
016237 
@16237 
016237 
016237 
016737 
016237 
016237 
000207 


000000 
000010 
000002 
000004 
000006 
000012 
000014 
000016 
006020 
000026 
000034 
000036 
000030 
000032 


001406 
001410 
001412 
001414 
001416 
001426 
001424 
001422 
001420 
001430 
001432 
001434 
001436 
001440 


MACY11 30(1046) O1-CEC-77 14:15 PACE 181 


*STORE R®611 UWIBUS RECISTERS 


e SBTTL *STORE RK611 OWIPUS PECISTEFRS 
JPATSAAAHAeAKaAKAeAARAAAHARAAHAAAAAHARAAHSAAAASAAKSRAAAAAAAAAAAAeS 
3* 
3* THIS SUPROUTIWE If CALLED BY THE RKOG CRIVEF TO STOPE ALL 
a R*®611 REGISTER IN TEMPORARY LOCATIONS. 
3* 
s*CALL JSR PC, 1.STOR 
3* RETURN 
3* 
2* REGISTER USE 
3° sneer eee oom 
3°? 
3* R2 ADDRESS OF RK611 RECISTERS 
& 
* se————e——s——————————————————————————————ν 
I.STORs MOV RECS1(R2),T-CS1 sSTORE ALL COWTRCLLFR REGISTERS 
ucy RFCS2(R2),7.CS2 3 EXCEPT DATS BUFFER 
MoV RFUC(R2),T.WCR 
MoV REBACR2), TBA 
MOV REDACR2),T.DA 
Mov REDS(R2), TDS 
MOV RRER(R2), TER 
MOV REASOP(P2),T.ASCF 
MoV REDCYL(R2),T.0C 
MOV REMRICR2),TMPL 
MOV RKMR2CR2),T.MR2 
MoV REMR3(RI),T.MRI 
MoV REECPS(R2),T.PCS 
MOV REECPT(R2),T.PAT 
RTS PC ZRETURM 


AG 


J 
— — — — — — — — — — — — — — — — — — — — — — — — —— — — — 





RF611/RE06 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


DZR6PB.P11 


6153 
6154 
8155 
8156 
8157 
6158 
6159 
8160 
8161 
8162 
8162 
8164 
8165 
8166 
6167 
8168 
8169 
8170 
6171 
6172 
8173 
6174 
8175 
6176 
6177 
8178 
8179 
8180 
6181 
8182 
6183 
8184 
8185 
8186 
6187 
8168 
6189 
8190 
6191 
8192 
8193 
8194 
8195 
8196 
8197 


046664 


046672 
046700 
046706 
046714 
046722 
046730 
046736 
046744 
046752 


046760 
046766 


11-AUG-76 00:00 


042765 


042737 
053765 
016265 
016265 
016265 
016265 
016765 
016265 
016265 


016765 
000207 


177741 


0000 36 
001406 
000010 
000002 
000004 
000006 
000012 
000014 
000016 


000020 


000016 


001406 
000016 
000020 
000022 
000024 
000026 
000036 
000034 
000032 


000030 


« SBTTL 


JF SMAAK A AAASAAASSSARASAAAAAAAHAAAAOARAAAADHOAAASAAHSHARAROAAAAAAAS 


3*CALL 
3* 


pp AeA eaeneanecaerananesesaanagananananaaasanananananaganeasaaaanane 


I.CSTS: 


I.CST1: 


MACY11 30€1046) O1-CEC-77 142315 PAGE 182 
*STORE CONTROLLER STATUS 


*STGRE CONTHOLLER STATUS 


THIS SUPROUTIWE IS CALLED 6Y THE RKOG CRIVER AT PRIORITY 7. 


TRE FOLLOWING REGISTERS WILL SE STORED: 


JSR 
RETURN 


COMMAND AND STATUS REGISTER 2 


WORD COUNT PECISTER 
BUS ADDRESS REGISTER 


DESTRED TRACK ABD SECTCR 


STATUS RECISTER 
ERROR REGISTER 


ATTENTION SUMMAPRY/OFFSET RECISTER 
CYLINDER ADDRESS PECISTER 


PC, I.CSTS 


TRIS POUTINE ASSUMES THE FOLLOWIBG PECISTERS CONTAIN: 


BIC 


BIC 
BIS 
HOV 
MOV 
MOV 
MOV 
MOV 
nov 
MoV 


woV 
RTS 


REGISTER 


R2 
RS 


8177741,P.CS1 (RS) 


#36,T.CS1 
T-CS1,P-CSICR5) 
RECS2(R2),P.CS2(R5) 
RFUC(CR2),P.WCRC( RS) 
REBACP2),P-BAR(PS) 
REDACR2),P.DTSC(RS) 
REDS(R2),P-DS(RS) 
RFER(R2),P ERC ES) 

RE ASOP(R2),P.ASOFC(RS) 


"Patani tat 
P 


CONTERTS 


ADDRESS OF PARAPETER PLOCK 


SCLEAR ALL PITS EXCEPT FUNCTION 
30F LAST COPMAND ISSUED 

sCLEAP FUNCTION OF CS1 SIPTUS 
SGEMERATE CS1 STATUS INPCRHATION 
SSTCRE CCPMAND AND STATUS KEGTSTER 
sSTCKE WCHD COUNT KECTISTES 

SSTORE BUS PDDRESS PECISTER 

SSTORE DESIRED TRACK AND SECTCR 
SSTOKRE ORIVE STATUS REGISTER 


SSTCKE ERECE REGISTER 


SSTORE ATTENTION SUPHARY 22RD 


3 60OF FSET 


SSTOKE CYLIRDER ADORESS 


ZRETUER 


é 


SEG 0204 


Z4 








‘ 
J 
J 










RE6G11/RKOG6 PERFORMANCE EXERCISER MATNDEC DZR6P-R 
OZR6PP.P11 


6198 
8199 
8200 
8201 
820° 
8203 
8204 
8705 
8206 
8207 
8708 
8209 
8210 
6211 
8212 
8213 
6214 
8715 
8216 
8217 
8718 
8219 
8220 
8221 
622? 
8223 
8224 
8225 
8226 
8227 
8228 
8229 
8230 
86231 
823? 
8233 
8234 
8235 
8736 
8237 
6238 
8739 
8240 
8241 
824? 
8243 
6244 
8245 
8246 
8247 
6248 
6249 
8250 
6251 
6252 
8253 


046770 


046776 
047004 
047010 
047012 
047020 
047026 


047034 
047042 
047046 
047050 
047056 
047064 


047072 
047100 
047104 
047106 
047114 
047122 


047126 
047134 
047140 
047142 
047150 
047156 
047164 


11-AUG-76 00:00 


012762 000001 


112737 000001 
004037 046314 
047200 

013765 001432 
013765 001434 
012762 000002 


112737 000001 
004037 046314 
047200 
013765 001437 
013765 001434 
012762 000003 


112737 000001 
004037 046314 
047200 

013765 001432 
013765 001434 
005062 000026 


112737 000001 
004037 046314 
047200 

013765 001432 
013765 001434 
032737 001000 
001407 


000026 
001406 
000044 
000046 
000026 
001406 
000050 
000052 
000026 
001406 


000054 
000056 


001406 


000040 
000042 
001434 


MACY11 30€1046) O1-DEC-77 14:15 PAGE 183 
*GATRER DRIVE STATUS 


« SBTTL *GATHER DRIVE STATUS 
3* 
pe THIS SUBROUTIFE WILL PE USED TG GATHER DRIVE STATUS 
3* BYTE O1, 10, AND 11. IT IS ASSUPED THAT TRE DRIVE 
3* HAS PREVIOUSLY BEEN SEIZED. IT RUNS AT PRIORITY 7. 
3* 
s*CALL JSR RO,1.STAT 
3* <ADDRESS OF EPROR RETURE> 
3* RETORN 
3* 
3* TRIS ROUTINE ASSUPES THE FOLLOWING FECISTERS CONTAIN: 
® 
* 
3° REGISTER courtars 
——— — 22222— 
i 
3* R2 RKO6 BASE ADDRESS 
3* RS ADDRESS OF PARAPETER PLOCE 
3* 
ied ROUTINES USED: 
3* I.1SSU 
3* 


JP TAAAAAAAAAAARAAAAARAAAAAARAAARAHRAAALARAAARAHARAAADHHRARARAAAHRARAAAS 


I.STAT: MOV 


#1, RKMR1CR2) 


#0R.SEL,T.CS1 
RO,T.1SSU 


T.MP2,P.A01L(RS) 
T.MP3,P-BO1( RS) 
#2, R2K¥R1¢P2) 


#O0R.SPFL,T.CS1 
RO, T.ISSU 


T.MP2,P.A10(R5) 
T.MR3,P-B10¢( 85) 
#3, RK¥R1(R2) 


#0R.SEL,T.CS1 
RO, T.1SSU 


ToMR2,P-ALIC RE) 
TeMP3,P.511(R5) 
REMPR1(R?) 


#0R.SEL,T.CS1 
RO, T.ISSU 


T.MF2,P.A00( FS) 
T.MP3,P.b00( RS) 
#S-PAR,T.¥RI 

5$ 


3LOAD MAINTEMANCE REGISTEF 
3 FOR STATUS BYTE 01 
sLOAD COMPARD 

sGET STATUS BYTES 01 
SERROR RETURD 

sSTORE STATUS BYTE O01 MESS 
sSTORF STATUS BYTE O1 HESS 
SLOAD MAINTENANCE RECISTEF 
3 CR STATUS BYTE 10 
sLGAC COMPARD 

sGET STATUS BYTES 10 
SERRGR RETURN 

sSTORE STATUS BYTE 10 MESS 
sSTCKhE STATUS BYTF 10 MESS 
SLOAD MAINTENANCE REGISTER 
3 PGR STATUS BYTE 11 
sLCaC CCMPARD 

3CET STATUS BYTES 11 
DERRCR RETURA 

SSTCKE STATUS BYTE 11 MESS 
SSTORE STATUS BYTE 11 MESSE 
SLOAD MAINTENANCE REGISTER 
3 CK STATUS BYTF 00 
sLGAC COMMAND 

sGET STATUS BYTES 00 
ZERRCR RETURN 

sSTCKFE STATUS BYTE CO MESS 
sSTORE STATUS BYTE 00 MESS 


sCHECK VF BAD PARITY DETECTED BY CRIVE 


30C, FETUFM NORPALLY 


~op 


~~ — 


sec 62¢5 





RK611/RKO6 PERFORPANCE EXERCISER MAINDEC DZR6P-B 
OZR6EPB.P11 


6254 
8255 
6756 
6257 
8258 
6259 
8760 
8261 
826? 


047166 
047174 
047200 
047202 


047204 
047212 
047214 


11-AUG-76 00:00 


052737 
004777 
011000 
000200 


052765 
005720 
000200 


002000 001460 
132256 
3$s 


001000 000014 S$: 


BIS 
JSR 
nov 
RTS 


BIS 
Tst 
RTS 


MACY11 30€1046) O1-DEC-77 14215 PAGE 184 


*GATHER DRIVE STATUS 


#€.0PAR,E.CONT 
PC, @A.CONT 
(RO), RO 

RO 


#PBSVAL,P.PRST(RS) 
_ 
R 


SEC 0206 


STUDICATE BAD PARITY TETECTED BY CHIVE 
SREPORT EPROR 

SLOAD RO FOR ERROR RETURE 

sPETURR 


SSET PARAPETER BLOCK STATUS VALIC 
JAOJUST FC POR HCRHAL GETURR 
sPETUPE 


Kile 








RKG11/RRO6 PERFORMANCE FXERCISER MATNDEC DZR6P-8 MACY11 20(1046) 01-DEC-77 14:15 PAGE 185 
DZR6PB.P11  11-AUG-76 00:00 *COMMAND INITATOR SEG 02¢7 
8263 -SBTTL  *COMMAND INITATOR 
tee. 3 FTAA vv V—— aeaganeaaaananeaeaens 
8266 3° 
8267 3° THIS SUBROUTINE WILL INITIATE ALL COMPANDS AS SPECIFIED 
8268 3° BY THE COMMAND FIELD CF TRE PARAMETER BLCCK. THE POLLCWIBC 
8269 3° SPECIAL COMMAND ARE ALSO EXECUTED: 
8270 3° 
8271 * RELFASE 
8272 3° COWROLLER CLEAR 
8273 3° SUBSYSTEM CLEAR 
8274 3° READ ALL DRIVE STATUS 
8275 3° READ SPECTFTED READER 
8276 3° 
8277 3° THE ABOVE COMMANDS ARE TRANSLATED INTO A SEQUENCE OF COPMANDS 
8278 * 
8279 p*CALL JSR PC,C.TmIT 
6280 3° <ADDRESS OF PARAMETER BLOCK> 
6281 3° RETURN 
878? * 
8283 3° FOR THE SFQUENTIAL OPERATIONS, THE CHIVES WILL LOAD TRE 
8284 3° LOCATIONS, PBLKT AND INTHSK. 
6285 3° 
8286 3° ROUTINES USED: 
8287 3° W.uTCH 
8288 3° 1.cSTS 
6289 3* 1.STAT 
8290 3° 1.CCLR 
8291 3* 
8292 33 SHAHAAARAAAARANKAHRAARAAAHAAARAAAARARANKeRHAARAAHAHRABRAAARAAAAAAeAAAAS 
8293 
8294 047216 010546 C.INIT: MOV RS,-(SP) sSTORE RS ON STACK 
8295 047220 010446 mov R4,-(SP) sSTORFE R4 OW STACK 
8796 047222 010346 mov R3,-(SP) PSTORE R3 OW STACK 
8297 047224 010246 Mov R2,-(SP) $STORE R2 OW STACK 
8298 047226 01014€ nov R1,-(SP) pSTORE R1 OW STACK 
8799 047230 010046 nov RO,-(SP) pSTORE RO OW STACK 
8300 047232 013746 177776 nov PS,-(SP) 3STOBE PSW Ob STACK 
8301 047236 013737 001450 177776 nov REPRI,PS sLOCK OUT RKOG TNTERRUPTS 
8302 047244 017605 000016 MOV @16(SP),RS PSTORE PARAWETER BLOCK ADDRESS 
8303 047250 062766 000002 000016 ADD #2,16(SP) ZACJUST GETURE 
8304 047256 016504 000000 mov P.DRVN(RS),P4  3STORE DRIVE NUPGER 
8305 047262 042704 177770 BIC S°CCDRVPSK>,R4 =5¥ASK OUT JURE 
8306 047266 156437 001510 001506 BISP  INTWSK(P4),W.TIME 9SET WATCH DCC TIME 
8307 047274 010403 nov R4,R3 sSTCKE DEIVE NUMBER 
8308 047276 006303 ASL R3 SPULTIPLY DRIVE BUMBER BY 2 
8309 047300 013763 001470 001540 nov W.SEC,.DRV(R2) JLOAD WATCH-DOG TIME 
210 
8311 047306 013702 001444 nov REBAS,R? sLOAC K2 WITH BRG6 ADDRESS PASE . 
8312 
8313 ; RESFT ALL BITS IN PROGRAM DEVICE STATUS KFGISTER FXCEPT 
8314 ; DRIVE IN OSE 
8315 ; WRITE FOR WRITE CHECK 
8316 ; WO CHECF 
8317 ; DROP DRIVE FROM TFST SEQUENCE 
6318 ; INHTBSTT BUS ADDRESS INCREMENT 


L/6 


6319 
8320 
8321 
8322 
8323 
8324 
8325 
8326 
8327 
8328 
6329 
8330 
8331 
8332 
8337 
6334 
6335 
8336 
6337 
8338 
8339 
8340 
8341 
8342 
8343 
6344 
8345 
8346 
8347 
6348 
8349 
8350 
8351 
8352 
3353 
8354 
6355 
8356 
6357 
8358 
8359 
8360 
8361 
8362 
8363 
6364 
6365 
8366 
8367 
8368 
8369 
8370 
8371 
8372 
8373 
8374 





a 


047312 


047320 
047322 
047326 
047330 


047334 
047336 
047340 
047342 
047346 
047352 
047356 
047364 
047366 


047372 


047400 


047402 
047410 


047412 
047420 
047426 
047432 
047440 
047442 
047450 
047456 


047460 
047466 
047470 
047476 
047504 


047506 
047514 
047516 
047524 
047532 


11-AUG-76 
042765 


010500 
062700 
010501 
062701 


005020 
020001 
101775 
105037 
010465 
005062 
132765 
001402 
000137 


122765 


101125 


122765 
103471 


016562 
052765 
005037 
122765 
001007 
01656? 
016562 
000431 


122765 
001007 
116565 
01656? 
000416 


122765 
001003 
013763 
12276* 
001003 


075176 000014 


000016 
000062 


001502 
000020 
000026 
000040 
047746 


000107 


000117 


000020 
00000? 
001462 
000117 


000002 
000004 
000115 
000006 
000032 
000111 


001474 
000113 


000001 


000001 


000001 


000010 
000014 


000001 
000020 
000006 
000001 
000032 
000016 
000001 


001540 
000001 


REK6G11/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
DZR6P8.P11 


MACY11 30(1046) O1-DEC-77 14:15 PACE 186 


*COMVAND INITATOP see 0206 
BIC @°CCDRVOSE IW. WCKENOCHKIDRPDOVIDTBAIID, P.PRST(RS) 
mov RS, RO sSTORE PARAMETER PLOCK ADDRESS 
ADD #P.CS1,F0 sCALCOLATE PIPST LOCATICH TC PE CLEARED 
nov RS, Pl sSTORE PAPAWETER BLOCK SODRESS 
ADD de .EPAT,R1 sCALCOLATE LAST LOCATION TO BE CLEARED 

1$: CLR (ROD* sCLEAR RETUPE PARANETER 
cup RO,R1 sCHECK TF FIBISRED 
Bstos 18 3NO, CLEAR WEXT RETURN PARAPETER 
CLR8 3s Ew SRL SCLEAR RELEASE CK INTERRUPT ISSUE 
nov R4,P.CS2(P5)  3STOKE DATVE BOPBER 
CLR REMR1(R2) SCLEAR RKOG MAINTENANCE REGISTER 1 
BITP $sBITS,P.CWND(RS) SCRECK IF SPECIAL COMMARD 
BEG 3$ gC, PROCESS 
JmP C.SPEC 3JUMP TO SPECIAL COMMAND PRCCESSCE 

3$3 CHPB «=—«-_- UNLOAD, P.CWNDCRS) sCHECK IF POSITIONING COMMAND 
3 START SPIBOLE 
3 PECALIBRATE 
3 OFFSET 
3 SEEK 
3 OptcaD 
BAI 25$ 30, DRIVE COMMART 
3 SELECT DRIVE 
3 PACK ACKNCWLECCE 
3 CLEAR 
CHPB =—s-s« @ SEEK, P.CPMD(RS) SCHECK IF DATA TRANSFER 
BLO 20$ 3VES, DATA TRABSFER CONPARD 
3 READ DATA 
3 WRITE DATA 
3 READ HEADER 
3 WRITE HEACES 
3} WRITE CHECK 
nov P.CS2(R5S),RKCS2(R2) ;LOAD ORIVE BUMPER 
BTS @DRVPOS,P.PRST(RS) 9SET DRIVE POSITIONING 
CLR O.WAIT 3CLEAP WAIT ECR CCKPAND 
CMPB #SEEK,P-CHEDCRS) 3CHECK IF SEEK 
BNE 380, CHECK FOR OFFSET 
MOV Pp cvancns) suncencn) 3LOAD CYLIBCER ADDRESS 
nov P.SECT(RS),RKDACR2) ;LGAD SECTCR ANC TRACK 
BR 8$ 360 ISSUE COMMAND 

5$: CVPR =—s- SOF FSET,P.CMND(RS) SCHECK IF CRFSET 
BNE 6$ 30C, CHECR PCR UALCaD 
MOVE ©6P.OFST(RS),P.ASOF(RS) sSTORE OFFSET 
MOV P.ASOF(RS),PKASOP(R2) 3LOAD CFFSET REGISTER 
BP 8$ 3CO ISSUE CCKPARD 

6$3 C¥PE «=«-_- @SRTSPL,P.CPMD(RS) SCHECK 1 START SPINOLE 
BNE 1S 30, CHECK TF RFCAL 
mov W.MIN,W.ORV(R3) 9LOAD WATCH COG TIME FOP 1 PIRUTE 

15: CVPR «= RECAL, P.CHRD(RS) 3CHPCE IF KECAL 

- BNE ae 30, CORTIBVE 


q 
Me 





RE611/WK06 PERFORMANCE EXERCISES “ATNDEC NZROP-F MACY11 30€1046) Oi-DEC-77 14:15 PACE 187 

D7°5PR.P11 11-2UG-76 00:00 *COMMAND IWNITATOR eC 02¢S 
8375 047534 013763 001472 001540 “ov W.BSEC,W.ORV(R3) sLOAD RECAL TIPE TC @ SECONDS 
8376 047542 116°65 000007 000017 8S: wove P.CSLM(PS),P.CS101(R5) sSTCFE BITS P-15 OF CS1 q 
8377 047550 042765 165777 000016 BIC @°CCCFNTICOT>,P.CSI1(R5) sCLEAP ALL BITS EXCEPT FCERIT 
@37" 3 AD ORTIVE TYPE 
8379 O47°S6 11656 000091 000016 wove P.CPND(PS),P.CSI1(RS) sHCVE CCPRARCD INTC CS1 <q 
8380 047564 042765 006200 00014 BIC @¥.UCF,P.PRSTCRS) ;PESET WRITE PCR WRITE CHECE 
e381 047572 000460 BP 30$ 3G0, ISSUE CCPRAND q 

28 
8383 047574 016562 000016 000004 20s: vor P.BALC(PS),PRRACR2) ;LOAD BUS ADDRESS REGTSTEF 
8384 047662 016562 000012 000002 nov P.WCCPS),PRWC(R2) ZLCAD WORD COUNT PECISTER 
8385 047610 016562 000002 000020 nov P.CYLN(RS),RKDCYL(R2) 3LOAD CYLTADER ADDRESS PECISTER q 
8286 047616 016562 000004 000006 uoV P.SECT( PS), PRDACR2) sLGAD SFCTCR ANE TRACK KUPBFE 
8387 047624 122765 000131 000001 CwPR @WRTCRK,P.CMND(RS) 3CHECEK Tf BRITE CRECK CONPANC 
838% 047632 001010 BRE 25$ 3NO, GO ISSUE TRE COMMAND q 
8389 047634 032765 000700 000014 BIT @W.WCF,P.PRST(RS)  3CRECK IF WRITE COMMAND SHOULD BE ISSUED 
8390 047642 001404 BEG 2*$ 3™C, CC ISSUE THE CCHPARC 
8391 047644 012765 000123 v00016 X SWROATA,P.CSI(RS)  ZISSUE WRITE CCMPARD <q 
8392 04765? 000406 BR 26$ 3GO ISSUE COMPARE 
829? 
6394 047654 116°6£ 400001 000016 255: MCVP P.C¥PND(RS),P.CS1(PS) sHOVE CCPNART THTO CSL <q 
8395 047662 042765 000200 000014 BIC @W¥.WCK,P.PRST(RS) ZPESET WRITE FCR WRITE CHECF 
8396 047670 116565 000007 000017 265: wove P.CSIF(RS),P.CS1¢1(RS) sSTORE BITS ®-15 OF CS} 
8397 047676 14276© 177750 0600017 BICB @°CCB.CFMTIP.COTIP.PAIGIB.BAL7>,FeCE161(R5) sCLEAB ALL PITS EXCEET <q 
8398 3 FOPMAT, DRIVE TYPE, BMD BUS ADERESS 
8399 3 BITS 16-17 
8400 047704 010537 00146? - MOV RS, 0.WATT PLOAD WAITIFG FOR CCHPaAND <q 
8401 047710 032765 100000 000014 BIT #DTBAIIZP.PRST(PS) ;CRECK If INHIPIT BUS ADDRESS INCRENERT 
8402 047716 001403 BFQ 27$ 3¥0O, LOAD CS2 
8402 047720 052765 000020 000020 BIS @BAT,P.CS2(RS5) 3SET IBHIAIT BUS ADDRESS IBCRENEBT « 
8404 047726 016£62 000020 000010 27$: wOV PoCE2CR®),RFCS2(R2) zLCAD C2 
8405S 047734 016562 000016 000000 305: MOV P.CS1(R25),RFCSI(R2) ISSUE coMut 
$406 047742 000137 050664 ove CokTRE RESTORE PECISTERS q 
0 

840e eSBTTL *SPECIAL COMMAND PROCESSIAG ‘ 
8409 
8410 047746 172765 000141 000001 C.SPEC: CYPR #POSTAT, P.CWND(RS) sCHECK IF SEAD DRIVE STATUS 
8411 047754 001132 BNE 10$ 36C, PROCFSS CIBER CCYRANDS 
8412 047756 0616562 000020 000010 mov P.CS2(RS),RECS2(R2) sLOAD CS2 FOR CCMYAND q 
8413 047764 116565 000007 000017 move P.CSIH(R5),P.CS141(R5S) STORE BITS F-15 OF CSI 
8414 047772 04276© 165777 000016 BIC @°CCCEMTICCT>,P.CSIC FS) sCLEAR ALL PITS EXCEPT PCERAT 
8415 3 ABD DRIVE TYPE q 
8416 050000 112765 000001 000016 MOVR #DR.SFL,P.CS1(RS) sSTORF COMMAND 
8417 050006 016562 000016 000000 MoV P.CS1( RS), RECSIC(R?) Z3TSSUS CCHRABC 
8418 050014 004737 043214 2$: JSK PC, ¥.WTCH CALL WATCH-CCG TIMFR <q 
8419 050020 016265 000000 000016 X RECSi(R2),P-CSICRS) ZSTORE COPMANT AND STATUS REG. 1 
8420 050026 032765 000200 000016 BIT #PDY,P.CS1(R5) s3WAIT FOR READY 
8421 050034 001767 BFG 2$ q 
8422 050036 004737 046706 JSR PC, 1.CSTi STORE CONTROLLER REGISTERS 
8423 050042 0162765 000034 000040 MOV RKMP2(R?),P.A00CRS) zsSTORE STATUS BYTE OO MESSAGE A 
8424 050056 016765 000036 00004? MoV RKMP3(R2),P.B00(RS) STORE STATUS BYTE OO MFSSACE B <q 
8425 050056 03276£ 100000 000016 BIT @CEPR,P.CSI(RS) ;CHECK YF CONTRCLLER ERPOP 
8426 050064 001443 BFQ 6$ "0, GATHER DRIVE STATUS 

- 8427 050066 146437 001510 001506 BICR INTYSK(R4),W-TIVE 3RESET WATCH DGC TIMING OW THIS DRIVE q 
8428 050074 005063 001540 CLR W.DRV(R3) CLEAR WATCR CCG COUNT 
8429 050100 032765 001000 00002¢ BIT #MDS,P.CS7(RS) ;CHECK If MULTIPLE CRIVE SELECT 


8430 050106 001046 BYE 9$ 3¥eS, INDICATE CCRTRGLLER ERRCR <q 








DZR6PB.P11 


6431 
8432 
6433 
6434 
8435 
6436 
6437 
64386 
6439 
8440 
6441 
6442 
8443 
6444 
6445 
8446 
8447 
6418 
6449 
8450 
68451 
64';2 
8453 
6454 
6455 
6456 
8457 
6458 
8459 
8460 
6461 
8462 
8463 
8464 
8465 
6466 
8467 
846F 
8469 
6470 
6471 
8472 
6473 
6474 
6475 
6476 
6477 
6478 
8479 
6480 
6481 
8462 
6463 
6464 
6485 
8486 


050110 
050114 
050116 
050124 
050126 
050134 
050136 
050144 
050152 
050160 


050164 
050170 


050174 
050200 
050202 
050210 
050214 
050220 


050224 
050232 
050236 


050242 
050250 
050252 


050256 
050264 
050272 
050300 
050306 


050314 
050322 
050330 


050334 
050342 
050344 
050350 
050356 
050364 
050366 
050774 


050376 
050404 
050412 
050420 
050426 
050434 


050442 


11-AaUG-76 


004037 
050664 
032765 
001017 
032765 
001013 
156437 
013763 
052765 
000137 


004777 
000137 


004037 
050664 
146437 
005063 
004777 
000137 


052737 
004777 
000137 


12276¢ 
001031 
010537 


05276* 
016562 
112737 
116565 
042765 


112765 
016562 
000137 


122765 
001047 
010537 
016537 
132765 
001404 
012737 
000402 


012737 
01656? 
016562 
016562 
116565 
042765 


112765 


00:00 

046232 
010400 
000001 


001510 
001474 
010000 
050664 


131264 
050664 


046770 


001510 
001540 
4131232 
050664 


100000 
131220 
050664 


000140 
001462 


000010 
000020 
000001 
000007 
165777 


000101 
000016 
050664 


000164 


001462 
000010 
000020 


000024 


000026 
000002 
000004 
000020 
000007 
165777 


000125 


000020 
000036 


001506 
001540 
000014 


00150€ 


001s” 


000001 


000020 
000010 
00150? 
000017 
000016 


000016 
000000 


000001 


001476 
000007 


001500 


001500 
000020 
000006 
000010 
000017 
000016 


000016 


RF611/RKO6 PERFORMANCE EXFRCISEP MAINDEC DZR6P-8 


MACYi1 36(€1046) O1-DEC-77 14215 PACE 1886 


*SPECIAL COMPAND PROCESSTAC 


S$: 


6$: 


9$3 


10$: 


11$: 


1352 


145 
22$: 


JSR 
C.RTRH 
BIT 
BWE 
817 
BNE 
BISP 
acy 
BIS 
J¥P 


RO, 1T.CCLE sCLearR ERRCP 
sERPCP RETURD 


SRHEDIUFE,P.CS2(R5S) SCRECK If RON-EXISTENT DRIVE CR UNIT FIELC ERECR 


$$ SREPCRT ERECE 
@DRA,P.DSCRS) sCHECK TF DPIVE AVAILIABLE 
$$ SYES, REPORT ERROR 


IWTMSK(R4),W. TIME SET TIMING FOR TRIS DRTVE 
WoMINZU.DRYC(R3) ;WATT 1 MINUTE PCR RELEASE 
@DRVSZD,P.PRSTCPS) 3SET DRIVE SEIZED 


C.RTRS SRESTORE RECISTERS 
PC, @A. ABUL SREPOPT ERRCE 

C.RTRA SRESTORE REGISTERS 
RO,T.STAT SCATHER ORIVE STATUS 


SERROP PETUPRH 
INTPSE(R4),W.TIME STOP WATCH-D0C TINTING OW DRIVE 


WeDRYVC(R3) SRESET WATCH-DOGC TIPE 

PC, GA. NORP SPEPORT COMMAND CCHPLETE 

C.RTRS SRESTORE REGISTERS 

#£.PDS,F CONT SSET WULTIPLE DRIVE SELECT 

PC, @A.CONT sTMDICATE CONTROLLER ERFOP 
C.RTRH 

@PELEAS,P.CPND(RS) SCRECK If FELEASE COPMARC 

13$ 30, CHECK IF REAT ALL READERS 
R5,0.WAIT SSTORE PARAMETER PLOCK ADDRESS I8 


> WATT FOR CONPARD 
@RLS,P.CS2(PS)  ZSET RELEASE PIT 
PeCS2CRS),RECS2(R2) ZLOAD CS2 FOR DESELECT 
#1,1.1SPL SSET PLAG FOR RELEASE COMWARD 
PoCSLACPS),P.CSI¢1(RS)ZSTORF PITS 6-15 CF CS1 
O°CCCPMTICDTS,P.CSIC(RS) sCLEAP ALL BITS EXCEPT FPCFERAT 
3 AND DRIVE TYPE 
SSELDPV,F.CS1(RS) ZSTCRE COPHARD 
P.CSICRE),RECSI(R2) ZTSSUP CCPRART 


C.RTRN SPESTORE RECISTERS 
@PDALHD,P.CPND(RS) 3SCRECK IF READ ALL HEADERS 

30$ 3NC, CHECK TF CCATHCLLER CLEAF 
R5,0.UAIT 3SET WAITING FCR COPMAND COPMPLETICN 


P.BALO(PS),HOR.AD ;LOAD HEADER ADDRESS 
#8.CFPT,P.CSIHC(RS) 3CHECK IF 22 SECTOR FORMANT 


14$ sYES, LOAD 22 IN READER COUNT 
820.,HDP.CT sLOAC 20 TH SECTOR COUNT 
22$ 3GO ISSUE READ READER COMMARD 
#22.,HDF.CT sLOAO 22 Tw SECTCR COUNT 


P.CYLN(RS),RKDCYL(R2) ZLOAD CYLINDER ADDRESS 
P. SECT(RS),PKDACK2) 3LCAD TRACK KUMPER 
P.CS2(25),RECS2(R2) ZLOAD DPIVE BOMBER 
P.CSIH(PS),P.CS1¢1(RS) STORE BITS #-15 OF CS1 


E°CCCPMTICDTD,P.CSIC(RS) sCLEAR ALL PITS EXCPPT ChIVE TYFE 


AND FORMAT 
@RDHEAD,P.CS1(R5) ZSTORF READ HEATER COPMAND 


SEC 021¢ 








RE611/RK06 PERFORMANCE EXERCISER MATNDEC DZR6P-P 
DZR6PB.P11 


6467 
6468 
64869 
6490 
6491 
6492 
6493 
8494 
8495 
6496 
6497 
64986 
6499 
6500 
8501 
8502 
6503 
6504 
6505 
6506 
8507 
6508 
8509 
6510 
8511 
8512 
8513 
6514 
6515 
8516 
6517 
8518 
6519 
6520 
6521 
8522 
8523 
6524 
8525 
8526 
6527 
6528 
8529 
8530 
6531 
8532 
6533 
8534 
8535 
6536 
8537 
6s53F 


050450 
050456 


050462 
050470 
050472 
050476 
050500 


050502 
050510 
050512 
050520 
050524 


050526 
050534 
050542 
050550 
050552 


050566 


050572 
050600 
050606 
050610 
050612 
050614 
050616 


050624 
050630 


05063? 
050634 
050642 
050644 
050652 
050660 


050664 
050670 
050672 
050674 
050676 
050700 
050702 
050704 


11-AUG-76 


01656? 
000137 


122765 
001004 
004037 
050664 
000467 


122765 
001406 
052737 
004777 
000457 


012762 
016765 
032765 
001406 
052737 


004777 
000437 


013746 


016765 
032765 
001411 
005316 
001367 
005726 
052737 


004777 
000415 


005726 
032765 
001010 
112737 
012762 
004777 


012637 
012600 
012601 
012662 
012602 
012604 
012605 
000207 


000016 
050664 


006176 
046232 


000177 
000100 
13073? 


000040 
000000 
100000 
000001 


130672 


001466 


000000 
040000 


000040 
130626 


000400 
177777 
000100 
130566 


177776 


000001 


000001 
001460 


000010 
000016 
000016 


001460 


000016 
000016 


001460 


000014 


001502 
¢90000 


MACY11 30€1046) O1-CEC-77 14:15 PAGE 189 


*SPECIAL COMMAND PROCESSING 


37$: 
38$: 


39$:3 


40$: 
C.RTRN: 


“ov 
JvP 


CrPr 
BRE 
JSK 
C.RTRN 
BR 


CwPr 


P.CSLCRS),RECSICR?) ZTSSUE READ HEADER 
C.RTRR SPESTOGE PECISTESS 


SCOMCLA,P.CMND(RS) SCRECK IP CONTROLLER CLEAR 
32$ 340, CHECK TF SUBSYSTEM CLEAR 


FO,1T.CCLE sCLEaR CORTRCLLES 

JERRCR PETUPA 
40$ sTMDICATE BORPAL RETURN 
@SUPCLR,P.CPND( RS) SCHECK IP SUBSYSTEM CLEAE 
36$ sYES, CLEAR SUBSYSTEM 
GF.ILLDO,E.CONT SET ILLECAL DRIVER COMMAND 
PC, @A.CONT SPEPCRT ERROR 
C.RTRR SRESTORE PECISTEGS 


SSCLR,RFCS2(R2) ZISSUE SUBSYSTEM CLEAR 
RECS1(R2),P.CSICRS) ZSTORE COPMABD AND STATUS REGISTER 1 
casemate: sCLEAR TF CONTROLLER ERROR RESET 

37$ 30, FIBISH CCPPARD 


SB81T0,E.CCET SSET CLEAR SUBSYSTEW DID NOT CLEAP 
3 CCWTRCLLES ERSCR 
PC, @A.CONT sREPORT ERROE 
C.RTR" SRESTORE RECISTERS 
U.MILI,-( SP) sLOAC 16 BPILI-SECCHD COUNT FOR ATTENTICH 


3 TO DISAPPEDR 
RECS1CR2),P-CSICRS) zsSTORE CS1 


@01,P.CS1( 85) sCHECR ITP ATTEBTICHS CLEARED 

39$ sYES, FIBISH COPH ART 

(sP) SDECRENERT 16 MILISECOND COUNT 

38$ SCHECK DRIVE INTERRUPT AGCAIR 

(SP) ZADIUST STACK 

@E.SCLR,E.CONT ZSET SUBSYSTEY CLEAR DID NOT CLEA 
> ORIVE ATTERTICHS 

PC, @A.CCHT SREPCRT ERRCE 

C.RTRN ZRESTORE PRECISTER 

(SP )« ZADJIUST STACK 


@NOCHFE,P.PRSTCRS) ZCHECK TF AC CHECK MODE 


C.RTRE SYES, RESTORE REGISTERS 
$-1,1.1SRL SSET INTERRUPT FNABLE SET 
#IE,RECS1(R2) 3SET INTERRUPT ERABLE 

PC, @A.NCRP ZTODICATE ACKPAL TEFMINATICK 
(SP )e,PS ZRESTORE PSW 

(SP )e,RO0 SRESTORE RO 

(SP)¢,R1 ZRESICRE RI 

(SP)¢,R2 ZRESTORE R2 

(SP )¢,R2 ZRESTORE P3 

(SP)o,R4 sPESTICRE R4 

(SP )e,R5 SRESTORE RS 

pc SRETURD 


seé0 0211 


C/ 









REG11/RKOG PERFORMANCE EX"RCISER MATNDEC DZR6P-8 MACY11 30(1046) 01-CEC-77 14:15 PAGE 190 
DZR6P®.P11 11-AUC-76 00:00 *EWQUEVE ROUTINE Seo 0213 
8539 -SBTTL *ERQUEVE ROUTINE 
— 3 ASS SAS VVVV 
6542 3* 
6543 3° THIS ROUTINE WILL BOT TRE ADORESS CF THE PAFAWETER Im TRE 
8544 7° QUEUE SFECIFIED BY THE LOCATION FOLLOWING TRE CALL. 
6545 3* 
8546 3*CALL JSR ho, 0.P0SH 
6547 3° CADDRESS OF QUEVE> 
es4r 3° RETURN 
8549 ° 
6550 3 FSSA AAAASAAAN AS AHRAAS AAA AAAAAAAAARAAARAAAAAAARAAHADAAARAAAAHAADEES 
8551 
8552 050706 010446 Q.PUSH: NOV = _—«&R4, - (SP) sSTORE R4 OF STACK 
8552 050710 010246 nov R3,-(SP) sSTORE R32 OF STAC 
8554 050712 013746 177776 nov PS,-(SP) sSTORE PSY ON STACK 
8555 050716 013737 001450 177776 nov REPRI,PS sLOCK OUT aros THTERRUPTS 
8556 050724 012004 nov (RO)*,R4 dSTORE QUEUF ADDRESS 
8557 050726 005065 000064 CLR P.GLNF(RS) sCLEAR QUEUE LIME 
8558 050732 0605724 TST (P46 sCHECK TF QUEVE IS EMPTY 
8559 050734 001405 BEQ 1$ dYES, PUT PARAMETER BLOCK ADDRESS 
8560 3 AT HEAD ABD TATL OF THE CUEUE 
8561 050736 011403 MOV (P4),83 sSTOKE TAIL CF QUEUF 
8562 050740 010563 000064 nov KS,P.QLNK(R3)  ZUPDATE QUEUE LIME 
8563 050744 010514 MOV RS, (R4) PUPDATE QUEUE TAIL 
8564 050746 000402 BP 2s 
8565 
8566 050750 010514 1$: MOV RS, (R4) sLOAD TAIL OF QUEUE 
9567 050752 010544 "ov R5,-(R4) pLOAD HEAD CF QUEUE 
6 
8569 050754 012637 177776 2$: nov (SP)¢,PS sRESTORE Psw 
8570 050760 012603 nov (SP )4,R3 sRESTORE R3 
8571 050762 012604 nov (SP)¢,R4 PRESTORE R4 
8572 050764 000200 RTS RO sPETORM 


Di 








REGII/RKOG PERFORMANCE EXERCISER WATNDEC DZR6P-F 


D7ZR6PB.P11 


6577 
6574 
6575 
6576 
8577 
es7F 


050766 
050770 
050772 
050774 
051000 
051006 
051010 
051012 
051016 
051020 
051024 
051026 


051030 
051034 
051036 
051040 


11-a0G-76 00:00 


011646 
010546 
010446 
013746 
013737 
012004 
011405 
010566 
001404 
016524 
001001 
005014 


012637 
012604 
012605 
000200 


177776 
001450 


000010 
000064 


177776 


177776 


MACY11 30€1046) O1-C&C-77 14315 PAGE 191 
*POP QGUEVE ROUTINE 


e S8TTL *POP QUEVE ROUTINE 


FF SMMASAAASS SAS AAA AOAHAAAAAAAAAAAAAOAARARARAAAAAAROROARAESAAHSHRESES 


3° 


3* THIS POUTINE WILL PUT TRE ADORESS OF THE FIRST PAPAPTESR 
3* BLOCK ADDRESS OF THIS QUEVE OW THE STACK AUT PEPOVE IT 
3° FROW THE QUEUE DESICHATED BY THE CALL. A RETURN OF ZERO 
3* OW THE STACK ITMDICATES THAT THE QUEUE WAS EPPTY. OTHERWISE, 
2* TRE STACK WILL CONTAIN THE ACDRESS CF TRE FIRST 
3* PARAMETER BLOCK ON THE QUEUE. 
o 
s*CalLtL JSR RO, 0.POP 
3* <ADDRESS OF QUEVE> 
3* RETURR 


FF TMAAASASAHALAAAAAAAAARAHAAAARAAAAHARAARORAAARARHAAAAAARAHRAASARHEADE 


Q.POP: MOV (SP ),-CSP) SCREATE SPACE CH THE STACK 

uov R=,-(SP) sSTORE PS OW THE STACK 

MOV R4,-(SP) sSTORE R4 OW THE STACK 

nov PS,-(SP) sSTORE PSW Oh TRE STACK 

nov REPRI,ZPS sLOCK OUT REGE IBTERKUPTS 

nov CRO)e,84 sSTOKE QUEUE ADTRESS 

MoV CR4),R5 3STORE PARAPETER PLCCK ADDRESS 

nov R5,10(SP) SLOAD ADDRESS CR STACK 

BEG 1s 21F GUEUE IS EMPTY, RETURN 

“ov P.GLUKCPS),(R4)¢ ZREADJUST REDD CF THE QUEUE 

BWE 1$ sTF WOT LAST ELERERT OF TRE QUEUE, PETUPS 

CLR (rR 4) SCLEAR TAYL FOINTER IF LAST ELEPERT OF CUFUE 
1S: nOV (SP)e,PS sPESTORE PSY 

MoV CSP )e,k4 SRESTORE R4 

nov (SP )#,R5 SRESTCRE 85 

RTS ko sPETURD 


SEC 0213 


E/ 


RK6G11/RKOG PERFORMANCE EXERCISER MATNDEC DZR6P-F 


DZR6PB.P11 


8624 051042 


8626 051046 
6627 051050 
8626 051052 
8629 051060 
8630 051062 
8631 051064 
8637 051070 


6634 051072 
8635 051076 


8637 051100 
863" 051104 
8639 051106 
8640 051112 
8641 051116 


8647? 051120 
8644 051122 
8645 051124 


11-AaUCG-76 00:00 


012704 


011405 
001425 
032765 
001404 
010504 
062704 
000766 


016514 
001012 


022704 
001405 
162704 
010437 
000207 


005024 
005014 
000207 


001324 


000002 


000064 


000064 


001324 


000064 
001326 


000014 
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*SEAPCH QUEVE FOR DRIVE NOT POSITIONING 


« S8TTL 


*SEAPCH QUEUE FOR DRIVE ROT POSITICHING 


FF SAASAA AS AAAAAAARAAAAARAARARAAARAAAGAAARAAADAAARROAASASHSAAREHESES 


THIS ROUTINE WILL SEARCH THROUGH THE COPHAND INITIATICH 
QUEUE FOR THE FIRST PARAMETER BLOCK BROSE DRIVE IS 

NOT POSITIOWING. IF THE QUEUE ITS EWPTY OF ALL DRIVES 
ARE POSITIONING ZERO IS PLACED IB RS. OTHERWISE, 

THE ADDRESS OF THE PARAMETER BLOCK IS PLACED IN RS. 


JSR PC,Q.SRCH 
RETURE 


s*HOTE: THIS ROUTINE DESTROYS #4. 
a 


FF ASAAAAAAALA AAA AAAAAAARHAAAAAALAAARASAAAAAAAAAADOAARAHAARAAAADADE 


Q.SRCR: MOV SCINITQ,R4 SLOAD ADDRESS OF COMMAND INITIATICH 


1$: 


2$3 


452 
55: 


3 QUEUE IB h4 


uov CR4) ZFS sCET WEXT QUEUE ELEPERT 
BEQ 5s 3TF EWD OF QUEUE, RETURE 
BIT SDRVPOS,P.PPST(RS) 3CHECK IF DRIVE TS POSITIONING 
BEG 2$ 3UC, RETURN FARAWETER BICCK ADDRESS 
MoV RS, P4 SUPDATE LIBK ADDRESS POINTER 
ADD #P .QLWK,R4 sCALCULATE LIWK ADDRESS 
BR 1s sGET WEXT ELEMENT OF QUEUE 
nOV P.QLMFC(PS),(R4) ZUPDATE QUEUE LIMF 
BNE $$ sCHECK If LAST ELEMENT OF QUEUE 
> TF NOT, OG BOT UPDATE QUEUF TAIL 
cee @CINITQ,R4 sCHECK YF ORLY ELEMENT IB QUEUE 
BF@ 4s sYES, CLEAk HEAD AND TATL 
SUB #P.OLRK,R4 SADJUST R4 FOR TAIL POINTER 
mov R4,CIBITG*2 sLOAC TAIL 
RTS PC sRETUPH 
CLR (P4)¢ SCLFAR HEAD CF QUEUE 
CLR (R4) sCLEAP TAIL CF CUFUF 
RTS Pc sPETURS 


SEG 0214 


Fl 




























































8646 
6647 
6648 
8649 
8650 
6651 
6652 
6653 
6654 
8655 
8656 
8657 
8658 
8659 
8660 
8661 
8662 
6663 
8664 
8665 
8666 
8667 
6668 
8669 
8670 
6671 
8672 
8673 
8674 
8675 
8676 
6677 
8678 
8679 
66860 
6681 
8682 
8683 
8684 
8685 
8636 
8687 
8688 
8689 
6690 
6691 
6692 
8693 
8694 
8695 
8696 
8697 
8698 


D7ZR6PB.P11 


051126 
051134 
051136 


051140 
051142 
051144 


051150 
051152 
051154 


051156 
051160 
051162 
051164 
051170 


051172 
051176 


051200 
051204 
051206 
051212 
051216 


051220 
051722 
051224 


051232 
051234 
051236 


032765 
001001 
000207 


010446 
010346 
012704 


011403 
0010061 
000000 


020305 
001404 
010304 
062704 
000767 


016314 
001012 


022704 
001405 
162704 
010437 
000402 


005024 
005014 
04276* 


012603 
012604 
000707 


040000 000014 


001324 


000064 


001324 


000064 
001726 


040006 000014 
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*REMOVE PAPAMETER PLOCK FROM COMMAND INITIATION CUEUF 


- S8TTL 


*REMOVE PAPAPETER PLOCK FROM CCHMANC INITIATION QUEUF 


FP AAASR AAS AAA AAAARAARASARHAHAHSAHASHOSAAHAAHAASHAHSHORARAARHOHEAES 


3* 


3*CALL 
3* 


THIS ROUTINE WILL CRECK IF THE CURKFAT PARAPETEP BLOCK 
IS IN THE COMMAND INITIATION QUEUE. IF IT IS, THIS 
ROUTINE WILL PEPCVE IT FROM THE COMPARD INITIATION QUEUE. 


JSR 


RETURN 


PC, Q.RMOV 


A 
s*NOTEs RS CONTAINS ADDRESS CF CURKFAT PARAPETER PLCCK. 


JF SAAAAAARAAAAARAHAAAARAAAAHAAAAAAASHADASARARHARASOADRADAARAERANHAEES 


Q-RMOV: BIT 


585: 


1052 


1152 


1252 


14$: 
15$: 


#Q. INIT, P.PPSTCRS) 3CHECK IF PARAPETER BLICK ENQUEVED If 


5$ 
PC 


R4,-( SP) 
R3,-(SP) 
SCINITQ,R4 


(PR4),P3 
11$ 


R3, R4 
#P.QLNK, £4 
10$ 


P.QLWF(F3),(R4) 
15$ 


SCINITQ,R4 
14$ 
#P.QLNK,k4 
R4,CINITQ¢2 
155 


— 


3 TAITIAFTIOM QUEUE 

sYES, GEMOVE PAFAPETER BLOCK 

3 FROM COMMAND INITIATION QUEUE 
sPETURD 


sSTOBF R4 OW STACK 
sSTORE R3 OR THE STACK 
SLOAD ADDRESS OF COMMAND IMITIATICA 
3 QUEUE TH 54 
sGET WEXT QUEUE ELEMENT 
sCHECK TF BO MORE ELEMENTS 

*e¢ FLAGS DO ACT AGREE wITR 
3 CCHMAND TRITTATICN QUEUE 
SCHECK JF CORRECT PARAMETER BLOCK 
sYES, ADJUST QUEUF 
SUPDATE LIBK ADDRESS POINTER 
sCALCULATE LIMK ADDFESS 
sCET NEXT ELEPERNT OF QUEUE 


SUPDATE GUEUVE LIAF 

sCHECK® TF LAST ELEMENT CP QUEVE 

+ IF MOT, DO NOT UPDATF QUEVE TATL 
sCHECK TF CHLY ELEMENT IN GUEUE 
sVES, CLEAR HEAD PUD TAIL 

ZADJUST R4 FOR TATL POINTER 

sLOAD TAIL 

sRETURD 


sCLFAR READ CF QUEUE 
sCLEAR TAIL CF QUEUE 


(P4) 
SDRVPDTIDEVPCSIC.TATT,P.PRST(BS) sCLEAR DRIVE PCSITIONING, 


(SP )¢,k3 
(SP ),R4 
ec 


3 DRIVE POSITICAING FOR DATA TRANSFER, AWD 
3 PARAWETER PLCCK ENQUEUVED IM IMITIATICH QUEUE 


ZRESTORE R3 
ZRESTORE R4 
sPRETURA 





























































8699 
8700 
6701 
86702 
6703 
6704 
6705 
6706 
8707 
6708 
8709 
6710 
8711 
6712 
6713 
8714 
6715 
8716 
8717 
8718 
6719 
8720 
8721 
8722 
6723 
8724 
8725 
8726 
8727 
6729 
8729 
6730 
6731 
6732 
6733 
8734 
8735 
8736 
6737 
673 
8739 
8740 
86741 
8742 
8743 
6744 
8745 
6746 
6747 
6748 
8749 
6750 
8751 
6752 
8753 
6754 


DZR6PR.P11 


051240 
051242 
051244 
051246 
051250 
051252 
051254 
051260 
051266 
051272 
051274 


051300 
051306 
051314 
051316 
051322 
051324 
051326 
051334 
051736 
051344 
051352 


051354 
051360 
051366 
051370 
051376 
051400 
051406 
051410 
051414 
051422 
051424 


051432 
051434 


010546 
010446 
010346 
010246 
010146 
010046 
013746 
013737 
005737 
001152 
013702 


016737 
032737 
001541 
004737 
005705 
001013 
032737 
001531 
112737 
012762 
000522 


005065 
12276* 
001410 
122765 
101021 
122765 
103415 
116504 
136437 
001407 
032765 


001411 
042765 


177776 
001450 
001462 
001444 


000000 
000200 


051042 


040000 
177777 
000300 
000212 
000164 
000121 
000131 


000000 
001510 


040004 


177776 


001406 
001406 


001406 


001502 
000000 


000001 
000001 
000001 


001507 
000014 


000014 
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*COMMARD OPTIMIZER 


-SBTTL 


*COMMAND OPTIMIZER 


3*CALL 


TRIS ROUTINE WILL INITIATE THE COMMAND AS SPECIFIED IW THE 
PARAMETER BLOCK OF THE FIRST DRIVE WHICH TS BOT POSITIONING 
IW THE COMMAND INITIATION QUEUE. 


JSR PC,C.O0PT 
RETURE 


ROUTIWES USED: 
C.IsIT 
Q.PUSH 
GeSPCH 


33 SKAAAAARSARSAAARARAARAARAASARAAARARARAAARARASAAAAARARAAAARARARAAAAAAAAESA 


C.OPT: 


1$3 


2$3 


nov RS,-(SP) 3STOSE RS OW STACK 

mov R4,-(SP) sSTORE R4 OW STACK 

mov R3,-(SP) sSTORE #3 OF STACK 

nov R2,-(SP) sSTCKE #2 OW STACK 

MoV R1,-(SP) dSTORE R1 OW STICK 

mov RO, -(SP) sSTORE RO OR STACK 

ncy PS,-(SP) sSTOKE PSW CA STACK 

nov RKPRI,PS SLOCK OUT RFOG INTERRUPTS 

Ttst O.WAIT SCHECE IF WAITING FOR COMMAND CCRFLETIO®R 
BRE O. RTRW 3VYES, BRESTOPE KRECISTERS 

MoV REBAS,R2 sLOAD R2 WITH BASE ADDRESS OF THE RKOE 


3 §©RECISTERS 
“ov RECS1(R2),T-CS1 sSTORE COMMAND ABD STATUS REGISTER 1 


BIT @ROY,T.CS1 sCHECK If READY SET 
BEQ O.RTRB 30, WAIT FOR COMMAND CCHPLETION 
JSR PC,0.SRCH SSEARCH FOR PARAMETER BLOCK ADDRESS 


Tst RS SCHECK TF WO CCPMAKD CAN BE ISSUEC 


BE 1$ sYES, ISSUE CCHPARD 

BIT #01,T.CS1 sCHECK IPF DRIVE INTERRUPT WAITING 
BEQ O.RTRW 380, RETURD 

MOVB #-1,1.1SRL sSET FLAG THAT TNTERROUPT WAS FORCED 


MOV @INTR,RECSICR2) ZFCRCE INTERRUPT TC SCAR DRIVE ATTENTICES 


BR O.RTRB SRESTORE RECISTERS 

CLR P.ERRC(RS ) SCLEAR ERROP STATUS IRFCRMATICH 
CVPR @RDALHD,P.CPND( KS) sCHECK IF FEAD ALL HEADEFS 
BEQ 2$ sYES, CRECK IF IMPLIED SEEK 

C™PR ret as CMNDCRS) SCRECK IF DATA TRARSFER 

BHI 3$ 3RC, GO TO THE CCPMAND INITIATCE 
CwPB @URTCHK,P.CMND(RS) ;CRECK If SPECIAL COMMAND 

BLO 3$ sYES, GO TO TRE CCMMAND INITIATOR 
uove P.DRUNC(RS),R4 #STORE DRIVE HUMBER 

BITB INTPSFC(CR4),C.CVER ;CHECK TF CVERLAPPED CVFRATICHS FCR THIS CHIVE 
BEQ 3$ 3NO, GO TO THE COPMAKD INITIATOR 


BIT GORVPDT,P.PRSTC(RS) 3CHECK IF PCSITICKIAC FCR 
3 DATA TRARSFEF CCCURET 
BEG 5$ 380, ISSUE SEEK 
BIC SDRVPDTIG.INIT,P.PRST(RS) ZCLEAR FOSITICHIAG IW FROCRESS FCEK 


























































6755 
8756 
6757 
6758 
6759 
8760 
8761 
6762 
8763 
8764 
8765 
8766 
8767 
6768 
8769 
8770 
6771 
8772 
8773 
8774 
6775 
8776 
6777 
8778 
6779 
8780 
8781 
8782 
8783 
8764 
8785 
8786 
6787 
6768 
8789 
8790 
8791 
8792 
8793 
6794 
6795 
8796 
86797 
6798 
6799 
68600 
8901 
6902 
6803 
8804 
6R05 
8806 
8807 
B80R 
6609 


O7R6PB.P1il 


051442 
051446 
051452 


051454 


051456 
051464 
051466 
051470 
051476 
051502 


051514 


051522 
051524 
051530 
051532 


051536 
051540 
051542 
051544 
051550 
051556 
051562 
051570 


051576 
051604 
051612 
051616 


051620 
051624 
051626 
051630 
051632 
051634 
051636 
051640 


010537 
004737 
000000 


000461 


156437 
010463 
006303 
013763 
005037 
105037 


042765 


05276* 


010500 
062700 
010501 
062701 


005020 
020001 
101775 
00506? 
016562 
010462 
116565 
042765 


112765 
016562 
004037 
001324 


012637 
012600 
012601 
012602 
012603 
012604 
012605 
000207 


051452 
047216 


001510 


001470 
001462 
001502 


075176 


040006 


000016 
000062 


0000 26 
000002 
000010 
000007 
165777 


000117 


000016 
050706 


177776 


001506 


001540 


000014 


000014 


600020 


000017 
000016 


000016 
000000 


3$3 
4$3 


Se Ge Ne Ge Se Be 


= Ne 


6$3 


O.RTRAS 
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*COMMARD OPTIMIZER 


R5,4$ 
PC,C.INTT 
0 


O.RTRN 


> DATA TRAWSFER ABD PARAMETER BLOCK ENCUEUEC 


3 Ih IBITIATICN QUEUE 


SLOAD PARAMETER BLOCK ADDRESS 
sTSSUE COMMARD 

ZADDEESS OF PARAMETER BLOCE 

3 PLACED HERE 

SRESTORE REGISTERS 


INTMSK(R4),W.TIPE 3SET WATCH DCG TIPPING 


R4,R3 
R3 


SSTORE DRIVE ROMBER 
SMULTIPLY ORIVE BUMBER PY 2 


WeSEC,8.ORV(R3) ZLOAD WATCH-DCE TIME 


C.WAIT 
I.1SR&L 


sCLEAP WATT FOR CCHPARD 
SCLEAR RELEASE OF IBTERRUPT ISSUEC 


RESET ALL TRE BITS TK THE PRCCRAM STATUS FECISTER EXCFPT 


BIC 


WRITE FOR WRITE CHECK 


NO CHECK 


DROP DRIVE FROM TEST SEQUENCE 
IWHIBIT BUS ADDRESS IWCREWERT 
O° CCORVOSE IW. UCK ANOCHE IDRPORY IDTBALID, P.PRST(RS) 


SET DPIVE POSITIONING, DRIVE POSITIOBING BECAUSE OF DATA TRANSFER, 
AND PARAMETER BLOCK EMQUEVED IN INITIATION QUEUE 
#DRVPOSIDRYUPDTIC.IKIT,P .PRST( PS) 


BTS 


CLR 
cop 
BLOS 
CLR 
MOV 
mov 
nove 
BIC 


MOVE 
Mov 
JSR 
CruiIte 


mov 
mov 
MoV 
Mov 
MoV 
MoV 
MOV 
RTS 


RS, RO 
#P.CS1,R0 
RS,R1 


#P.EPAT, #1 


CRO) 
RO,R1 

6$ 

RKMR1 (RP) 


sSTORE PARAWTER BLOCK ADDRESS 
sCALCULATE FIRST LOCATICH 10 PE CLEARED 
sSTORE PAPAPETER BLOCK ADDRESS 
sCALCULATE LAST LOCATION TO BE CLEARED 


sCLEAR RETURN PARAMETERS 

sCHECK IF FINISHED 

340, CLEAR REXT RETURN PARAMETER 
sCLEAR WATNTEWARCE RECISTER 1 


PoCYLN(RS),RKDCYL(K2) sLCAD CYLIBCE® ADDRESS 


R4, PKCS2(R2) 


sLOAC DEVICE WUPBER 


PoCSIH(RS),P.CS1¢1(R5) ZSSTOPE BITS #-15 OF CS1 
S°CCCPMTICDTD,P.CSI( FS) sCLEAR PITS EXCEPT FORMAT AND 


3 DRIVE TYPE 


@SEFK,P.CS1(RS) sSTORE COMMAND 
P.CS1(R5),RFCS1(R7) ZISSUE SEFK 


RO, 0.PUSH 


(SP)¢,PS 
(SP)¢,R0 
(SP)@,R1 
(SP )e,R? 
(SP )o,R3 
(SP )e,R4 
CSP Do,RS 
Pc 


ZPEQUEUF CCPP ABCD IK COMPANL 
3 IBITIATIATION GUEVE 


sPESTCRE PSY 
SRESTCRE RO 

SRESTORE P1 

SRESTORE P2 

2FESTCAE R3 

ZPESTORE R4 

SRESTCRE RS 

SRETURD 
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OZR6PB.P11 


8810 
6811 


681? 


6f13 
6614 
6815 
6816 


051642 
051646 
051650 
051654 
051660 


11-AUG-76 00:00 


104401 
011646 
004737 
104401 
00000? 


063671 


052144 
001165 


@SBTTL MEMORY CHECK EMABLE TEST 


MEMERR: TYPE 
nov 


JSR 
TYPE 
RTI 


MACY11 36€1046) O1-DEC-77 14315 PAGE 196 
MEMORY CHECK ENABLE TEST 


7 ERR400 
(SP),-(SP) 
PC,BINOCT 
a SCRLF 


STYPE UREXPECTED PEPORY PARITY TAPP 
sTYPE PC VALUF 


sPETURN 


SEG 0216 


of 
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OZR6PB.PI1 11-AUG-76 00:00 TYPE ROUTINE SEQ 0219 
6817 eSBTTL TYPE POUTINE 
R 
ae 3 3 geeaeneanaeaan2eana2neaanananarkarzarzarzagzanaagzaranaanaaaaannaaasanasaenanasace 
6820 s*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERPINATE WITH A O BYTE. 
88621 S*THE ROUTIWE WILL INSERT A NUMPER CF BULL CHABACTERS APTER A LIKE PEED. 
862? 3*NOTE1: SHULL CONTAINS THE CHARACTER TO BE USED AS THE PILLER CRAFACTER. 
8823 3*MOTE2: SPILLS CORTAINS THE HUMBER OF FILLER CHARACTERS BEQUIRED. 
* 3*NOTE3: SFPILLC CONTAINS TRE CHARACTER TC PILL APTER. 
825 3* 
8826 3*CALLs 
8827 3*1) USTHC A TRAP IWSTRUCTION 
6828 3* TYPF aPMESADR S3MESADR ITS FIFST ADDRESS OF AM SECTIZ STEIAC 
8829 3*0P 
8830 3* TYPE : 
6831 3* MESADR 
88632 3* 
8833 
8834 051667 105737 001157 $TYPE: TSTB STPFLG 9331S THERE A TERMIMAL? 
8835 051666 100002 BPL 1s 33BP ITF VES 
8836 051670 000000 HALT 33HALT PEPE IF BO TERMIRAL 
8837 051672 000430 BR 3$ 3 3LEAVE 
8836 051674 010046 1$3 nov RO,-(SP) S3SAVE RO 
8839 051676 017600 000002 “ov @2(2P),P0 33GET ADDRESS CP ASCIZ STRING 
8840 051702 122737 000001 001210 cmuePe @APTENV, SERV S3RUNNING IN APT PODE 
6841 051710 001011 BRE 62$ 3380,CO CHECK FOR APT CONSOLE 
8842 051712 132737 000100 001211 BITe @APTSPOCOL,SENUM 33SPCOL MESSACE TC APT 
8843 051720 001405 BEQ 62$ 3300,CO CHECK FOR CONSOLE 
8844 051722 010037 051732 MOV RO,61$ S3SETUP MESSACE ADDRESS FOR APT 
8845 051726 004737 054574 JSR PC,SATY? 33SPCOL MESSAGE T0 APT 
86846 051732 000000 61$: eWORD 0 SSMESSAGCE ADCRESS 
8847 051734 132737 000040 001211 62$: BITB @APTCSUP,SENVM 334PT CONSOLE SUPPRESSED 
6848 051742 001003 BWE 60$ S3VES,SFKIP TYPE CUT 
8849 051744 112046 252 nove (PO )e,-(SP) 33PUSH CHARACTER 10 BE TYPED ONTC STACK 
68850 051746 001005 BRE 4$ 338R IF IT ISH°T THE TERMINATOR 
6851 051750 005726 Tst (SP) 331F TERMINATOR PCP IT OFF THE STACK 
885? 051752 012600 60$: uov CSP )¢,RO SSRESTORE RO 
6853 051754 062716 0006002 252 aDD #2¢ (SP) S3ADJUST RETUPR EC 
8854 051760 000002 RTI 33RETORN 
89855 051762 122716 000011 4ss crvPR GFT, ¢5P) 23BRAWCH IF <fT> 
8856 051766 001430 BEQ es 
8857 051770 122716 000200 CvPR #CRLF,(SP) 33BPAWCH IF ACT <CRLFD 
8858 051774 001006 BNE 5$ 
68859 051776 005726 TST (SP Do 33PO0P <CR><CLF> EQUIV 
8860 052000 104401 TYPE SSTYFE A CR AND LF 
8861 052002 001165 S$CKLF 
8862 052004 105037 052140 CLaB SCHARCUT 33CLEQR CHARACTER COURT 
8°63 052010 000755 BR 2$ 33GET WEXT CHARACTER 
6864 052012 004737 052074 5$3 JSR PC, STYPEC 33GO TYPE THIS CHARACTER 
8865 052016 123726 001156 6$: cpa SPILLC,( SP) 3318S If TIME PCR PILLFR CRARS.? 
8866 052022 001350 BNE 2s 331F WO GO CET REXT CHAR. 
8867 052024 013746 001154 MOV $NULL,-(SP) 33CGET @ GP FILLER CHARS. WEEDED 
8866 33AWNC TRE BOLL CHAR. 
8869 052030 105366 000001 7$3 OECB 1(SP) 33D0ES A BULL BEED TO BE TYPED? 
8870 052034 002770 BLT 6$ 33BR TF BO--GO POP THE NULL OFF GF STACK 
8871 052036 004737 052074 JSR PC, STYPEC 3260 TYPE A BULL 
8872 052042 105337 052140 OFCB SCHARCNT 3300 NOT COUNT AS A COUNT 


Kl 





atolotatoletateletetatetetetetatetetotatats | 








A 


», RRG11/R2K06 PERFORMANCE EXERCISER MAINDEC DZROP-8 MACY11 30€1046) O01-CEC-77 14315 PACE 196 
DOZR6PB.PI1L 11-aUC-76 00:00 TYPE ROUTINE SEG 0226 

ote: 052046 000770 BP 7$ 33LOOP 

4 
6675 SHORIZONTAL TAB PROCESSOR 
6876 
6877 052050 112716 000040 8$s Movs 8° (SP) S3REPLACE TAB WITH SPACE 
887@ 052054 004737 052074 952 JSR PC,$TYPEC S3TYPE A SPACE 
8879 052060 132737 000007 052140 BITB #7 SCHARCRHT 33BPARECH TF ACT AT 
8880 052066 001372 BNE 9$ 33TAB STOP 
6861 052070 005726 tst (SP Do 33P0P SPACE OFF STACK 
6882 052072 000724 BP 2$ 33CET BEZT CHARACTER 4 
6863 052074 105777 127050 S$TYPEC: TSTB esTrs 220417 ONTIL PEISTER TS BEADY 
68884 052100 100375 BPL $TYPEC 
6865 052102 116677 000002 127042 movB 2(SP),@STPB 33LOAD CHAR TO @E TYPED INTO DATA BEC. 
88686 052110 122766 000015 000002 CrPR @CR, 2¢SP) 3931S CHARACTER A CARRIACE RETURN? 
6887 052116 001003 BRE i$ 338RARCH IF BC 
6868 052120 105037 052140 cuan S$CHARCHET 33VES--CLEAR CHARACTER COUNT 
6889 052124 000406 Br $TYPEX SPEXIT 
8890 052126 122766 000012 000002 i$: Cres @LF,2¢ SP) 331S CHARACTER A LIBRE FEED? 
68691 052134 001402 BEQ $TYPEX 33BRANCH IF YES 
6992 052136 105227 Ince (PC) S3COURT THE CRARACTER 
6893 052140 000000 SCHARCHT:.uORD 0 S3CHARACTER CCURT STGRACE 
8894 052142 000207 STYPEX: RTS Pc 
8295 
6896 
eae @SBTTL BIRARY TO OCTAL (ASCII) CCBVERSTCE 

9 
8899 3 3 SSKSASASSASSTCSSSASNSSSASASSHSSSNSHSSSAAHSSSSHSHSHSSHSSHNHRSASASSRSARANAHASAAEEEEE 
8900 3* 
8901 3* THIS RONTIBE TS USED TO CHANGE A 16-BI1T BINARY BUPBER TO 8 
8902 3° 6-DIGIT OCTAL (ASCII) BOUNCER. 
8903 3° 
6904 Z*CALL HOV NON, ~¢ SP) 
8905 3* JSR PC, B8I180CT 
— 3° Re TURN stuwreeR 18 OCTSTC 
& 
— * Seaeeeeneananaseanacasaesaaeseaacaacesacaeanancaneaaneansasaecaseeeasesace 
8909 
- 86910 052144 BINOCTs 

6911 052144 010746 nov R3,-(SP) 33PUSH B83 CR Stace 
8912 052146 010446 aov R4,-( SP) 33P0S" R4 OW STACK 
6913 052150 010546 nov R5,-(SP) 33PUSH PS O8 STACK 
6914 052152 012704 000006 nov 06,94 sSTCbE CCOBT 
8915 052156 016605 000010 mov 40(0SP),85 SPICKOP IBPUT BUPRER 
8916 052162 012703 052240 nov gOCTSTG,&3 sLOAC ADDRESS OF CONVERTTED sratat 
68917 052166 005013 CLR q®3) sCLEaR OUTPUT BYTE 
8918 052170 00610 &OL ke sPCTATE HSB IBTC “Cc 
aoe 052172 000404 be 3$ 3¢O CO #s® 
6 
8921 052174 006105 2$3 BOL he sPGRe THIS TICIT 
8922 052176 006105 ROL RS 
8923 052200 006105 ROL as 
6924 052202 110512 nove RS, (R?) 
8925 052204 106113 3S: RCLP (#3) sCE? LSP OCF THIS CICIT 
8926 052206 142713 177770 BICcB €177770,¢83) 3CET PID OF JUAF 
8927 052212 152723 ¢00060 BIS 8°O,(P3)e sPAFE IT ASCII 
8928 052216 005304 DEC rz) sCHECE TF DORE 





RE611/RKOG PERFORMANCE EXERCISER MATBDEC DZR6P-8 


OzRé6P8.P1l 


6929 
8930 
6931 
8932 
6933 
6934 
6935 
6936 
6937 
6938 
6939 
6940 
6941 
8942 
6947 
8944 
8945 
8946 
6947 
6948 
6949 
6950 
6951 
8952 
6953 
6954 
8955 
6956 
6957 
6958 
8959 
6960 
8°61 
896? 
8963 
8964 
8965 
6966 
8967 
6968 
8969 
8970 
6971 
897? 
6973 
6974 
8975 
8976 
8977 
8978 
8979 
8980 
6961 
8962 
8983 
6964 


052220 
052222 
052224 
052226 
052230 
052232 
052736 


052240 
052246 


052250 
052252 
052260 
0522764 
052266 
052274 
052302 
052310 
052312 
052316 
052320 
052324 
052330 
052334 
052336 
052340 
052346 
052350 
052356 
05 2360 
052366 


052370 


11-AUG-76 00:00 


001365 
612605 
012604 
012603 
012616 
104401 
000207 


011646 
016666 
105777 
100375 
117766 
042766 
076627 
001013 
105777 
100375 
117746 
042716 
022627 
001366 
000750 
026627 
002407 
026627 
003003 
042766 
0000062 


010346 


052240 


000004 
126660 


126654 
177600 
000004 
126626 
126622 
177600 
000021 
000004 
000004 


000040 


000002 


000004 
000004 
00002? 


000140 
000175 
000C04 


MACY11 30(1046) O1-DEC-77 14215 PACE 199 


SIBARY TO OCTAL (ASCII) CCBVERSTON 


BOWE 
nov 
nov 
nov 
mov 
TYPE 
ats 


OCTSTG: .BLFB 
@B8YTE 


2s 
(SP)¢,85 
(SP )o, 84 
(SP)¢,a3 
(SP )¢,(SP) 
@OCTSTG 
ec 


6 
0,0 


oS8TTL TTY INPUT ROUTINE 


JF SSS SS SSS SSS SSSA SSS HSSAS OSS οο 


efHABL LSB 
-DSABL LSB 


F FAAS — 


2ernus POUTINE WILL INPUT A SIBCLE CHAROSCTER FRCH TRE TTY 


S3IBPUT 4 STOCLE CHALACTER FROM TFE TTY 
SeCHARACTER 1S CH THE STACK 
s3UTTH PARITY BIT STRIPPED OFF 


3*CALL: 

3° ROCHE 

3° RETURN HEPE 

3? 

2 

SPOCHR: MOV (SP ),-(SP) 
nov 4(SP )42(SP) 

1$3 TsT8 esTKs 
BPL i$ 
ovr eSTFB,4(SP) 
BIC @°C<177>,4(SP) 
cre 4(SP),893 
BRE 3$ 

2$3 TsTe eSsTKs 
BPL 2$ 
HOUR @STEB,-( SP) 
BIC #°C177,¢SP) 
CMP (SP )¢,821 
BRE 2$ 
BP 18 

2182 cup 4(SP ),8140 
BLT 4$ 
cup 4(SP),817* 
BCT 4s 
BIC 840,4(SP) 

4$: RTI 


3™CG CONVERT BERT CICIT 
33P0P STACK ISTC 95 
33PO0P STACK I8TO #4 
93P0P STACK ISTC 63 
sSETUP STACK FOR PETURS 


sTYPE SUNDER 
sPeTors 


33P0SH DOWR TRE PC 


S3SAVE THE PS 
220417 FOR 

334 CHARACTES 
33RE8D THE TTY 


33GET RID OF JUNK IF AnY 
3518S TT & COBTROL~-S? 


33BPANCF IF B80 


33GAIT FOR A CHARACTER 
SSLOCP OSTIL ITS THEKE 


33GET CHAPACTES 


SsMAKE IT 7-BIT ASCII 
3318S TT 4 COBTROL-O7 
331° BCT DISCAED IT 


S3VES, PESUYE 


3331S IT UPPER CASE? 


33BPANCH IF YES 


3318S 17 A SPECIAL CHAR? 


33BPANCH IF YES 


SPMAKE TT UPPER CASE 
3360 BACK TC USES 


JP SAAAAAAA ASA AOAAAAATASAAOASAHARHSHAAKAKAHS BAAHSASesaasesssaseeseees 


s*THIS ROUTINE WILL INPUT A STRING FROM TRE TTY 


»*CAaLLs: 

3* ROLTO 

F Nd RETURN HERE 

3* 

SPOLIN: MOV R3,-(SP) 


S31NPUT A STRING FROM THE TTY 
Jd ADORESS OF FIRST CHARACTER WILL BE CH TPE STACK 
SSTEGMIBATCR WILL BE A BYTE OF ALL O°S 


d3SAVE R3 


S&¢ 0271 


Ml 





. 


R®611/RF06 PERFORMANCE EXERCISER MAINDEC DZR6P-F 


DZREPB.P11 


6985 
6986 
8987 
69868 
6989 
8990 
8991 
8997 
6993 
8994 
8995 
8996 
8997 
8998 
8999 
9000 
9001 
900? 
9003 
9004 
9005 
9006 
9007 
9008 
9009 
9010 
9011 
9012 
9013 
9014 
9015 
9016 
9017 
901" 
9019 
9020 
9021 
9022 
9023 
9024 
9025 
9026 
9027 
902° 
9029 
9030 
9031 
903? 
9033 
9034 
9035 
9036 
9037 
9038 
9039 
9040 


052372 
052374 
052400 
052404 
052406 
052410 
052412 
052416 
052420 
052422 
052424 
052432 
052436 
052442 
052444 
052450 
05245? 
052456 
052462 
052464 
052466 
052470 
052476 
052502 
052504 
052510 
052512 
052516 
052520 
052524 
052526 
052530 
052534 
052540 
052542 
052546 
052550 
052554 
052560 
052564 
05256€ 
052572 
052576 
052600 
052602 
052604 
052612 
052620 
052622 
05262? 
052624 
052655 
052662 
052667 
052674 
052700 


11-AUG-76 00:00 


005046 
012703 
022703 
101456 
104402 
112613 
122713 
00102? 
005716 
001007 
112737 
104401 
012716 
005303 
020327 
103434 
111337 
104401 
000746 
005716 
001406 
112737 
104401 
005016 
122713 
001002 
104401 
000726 
122712 
001011 
105013 
104401 
104401 
000717 
104401 
000712 
111337 
104401 
122723 
001305 
105063 
104401 
005726 
012603 
011646 


020040 


052624 
052655 


000177 


000134 
052622 
177777 


052624 


052622 
05262? 


000134 
052622 


000025 
052655 
00002? 
001165 
052624 
001164 
052622 
052622 
000015 


177777 
001166 


000004 
052624 


006525 
005015 
051412 
000040 
042516 


05262”? 


05262? 


000002 
000004 


000012 
000 
0£1127 


020127 


MACY11 30(1046) 


TTY INPUT ROUTINE 


10$: 


9$3 


STTYIN: 
SCNTLU: 
SCNTLG: 
S¥SWR: 


SMNEWs 


CLR 
MoV 
CMP 
BLOS 
ROCHR 
“ove 
C¥PR 
BYE 
TST 
BWE 
MOVR 
TYPE 
anv 
DEC 
cvp 
BLC 
Move 
TYPE 
BP 
TST 
BFQ 


eASCI7 
eASCI7. 


-(SP) 
aSTTYIN,R3 
aSTTYIN@25.,R3 
4s 


(SP )¢,(F3) 
#177, (R3) 


#-1,(SP) 
R3 
R3,9STTVYI® 
4s 
CR3)69S 

$ 


(SP) 
#25, (R3) 
6$ 


a SCNTLU 
1$ 
#22,(P3) 
3$ 


2? 
#15, (P3 De 
2s 

-1¢P3) 

@SLlFP 

(SP)+ 
(SP)¢,83 
(SP),-(SP) 
4(SP), 2(SP) 
SSTTYIN,4(SP) 


0 

0 

2S. 

4°U/¢15>¢€12> 
1°G/<15><12> 
€15><€12>/SeP = / 


4 WEw = / 


O1-CFC-77 14315 PACE 200 


sSCLEAR THE RUBOUT FEY 
33GF1 ADDRESS 

3 7BUFFEP FULL? 

33BR IF YES 

37G0 PEAD CRE CRAFACTFR FROP THE 11Y 
33GET CHARACTER 

3371S If A RUEQUT 

33BP TF &O 

3731S THIS THE FIRST KUBCUT? 
37BR TF uC 

33 TYPE A BACK SLASH 


33SE1 TRE RUBOUT FEY 

37BACKUP BY ONE 

33STACK EMPTY? 

33BP TF YES 

33SETUP TO TYPEQUT THE CELETED CHAK. 
2260 TYPE 

33G0 READ ANCTHER CHAR. 

s7RUBOUT KEY SET? 

33B8R IF 80 

33TYPE A BACK SLASH 


s3CLEAR THE KOUBCUT FEY 

3301S CHARACTER A CTRL U? 
33BR TF &O 

33TYPE & CONTROL “U" 

33G0 START CVEK 

331S CHARACTER A "°R"? 
73BRAWCH TF AC 

33CLEAR THE CHARACTER 
S3TYPE aA PCR® & “LE 

S7TYFE THE TRPEUT STFING 
33GO PICKUP AWCTHER CHACTER 
ssTYPE A °?° 

33CLEAR THE BUFFEP AKD LOCE 
33ECKhO THE CHARACTER 


33CHECK FORK KFTOKN 

33LOCP TF SC1 RETURN 

37CLEAR RETORKN (TPE 15) 

s3TYPE A LINE FEEL 

22CLEAM RUBCUT FEY FROM TRE STACK 

Se RESTCRE K2 

37ADJUST THE STACK ALD PUT ADTAFESS CF TRE 
33 FIRST ASCII CHAPACTER C8 IT 


77 RETORN 

s3STCRACE FOR ASCII CHAR. TC TYPE 
s3TERMINATCR 

SsRESERVE 25. BYTES FOR TTY INPUT 
s3CONTROL "0" 

3;COMTROL "Cc" 


SEG 0222 


Az 








7 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


_) OZR6PB.P11 


9041 
9042 
9043 
9044 
9045 
9046 
9047 
9048 
9049 
9050 
9051 
905? 
9053 
9054 
9055 
9056 
9057 
9058 
9059 
9060 
9061 
9062 
9062 
9064 
9065 
9066 
9067 
9068 
9069 
9070 
9071 
9072 
9073 
9074 
9075 
9076 
9077 
9078 
9079 
9080 
90861 
9082 
9083 
9084 
9085 
9086 
9087 
9068 
9089 
9090 
$091 
9092 
9093 
9094 
9095 
9096 


052706 


052712 
052720 
052726 
052732 
052740 


052742 


052750 
052756 
052764 
05 2766 
052772 
052776 
053004 
053010 
053016 
053022 
053030 


053032 
053040 
053042 
053046 


053050 
053056 
053060 
053066 
053070 
053074 
053100 
053104 
053110 
053114 
053120 
053122 
053124 


11-AUG-76 00:00 


020075 
052712 


012737 
013737 
005777 
012777 
000207 


117737 


142737 
122737 
001022 
104401 
005077 
016637 
004737 
013737 
005777 
012777 
000002 


122737 
001403 
104401 
0000062 


022737 
001373 
122737 
001767 
104401 
104401 
013746 
004737 
104401 
005077 
005046 
005046 
105777 


052742 
001450 
126714 
000100 


126200 


000200 
000003 


053311 
126146 
000002 
011526 
001450 
126124 
000100 


000007 
053304 


000176 
000001 


052662 
052667 
000176 
052144 
052700 
126024 


126014 


000060 
000062 


126204 


053304 


053304 
053304 


177776 
177776 
126114 


053304 


001140 
001134 


MACY11 30(€1046) O1-CEC-77 14:15 PAGE 201 
TTY INPUT ROUTINE 

EVEN 

eSBTTL TK INITIALIZE ROUTINE 


33 SRAARSAKRAAAARARAARAAARAARAEARAAAASARAHAARAAARAARARAAAARAAARAARAAAAAARAARARA 


3* 
3* THIS ROUTINE WILL IWITIALIZE THE TTY KEYBOARD TO ALL THE 
we OPERATOR TO COMMUNICATE WITH THE PROCRAP. 
3* 
3*CALL 
3* JSK PC, STRINT 
3* RETURN 
3* 
pPTTMMAKaeeeaeseneneaesaasananeeneneseneanaessaesesenensensnanees 
S$TKINT: MOV @S TK SRV, TKVEC sTMITIALIZE TRE KEY BOARD VECTCR 
MOV REPPI,TKVECe2 sLOCK REO6 AND TTY INTERUPTS 
TST eSTKBS SCLEAR DORE FLAG 
nov #IE,@STFS SEMABLE INTERRUPT 
RTS Pc sPETURN 


eSBTTL TK SEPVICE ROUTINE (CRLY CONTROL C IS REGRIZED) 
STKSRV: MOVB eS TFB,2$ sPICK UP CHARACTEP AND STORE FOR 
3 PRINT OUT 

BICB #B81T7,2$ sSTRIP THE JUNK 

CMPR 13, 25 31S IT A CORTRCL-C 

BWE 1$ 3NO, PRINT <CRARD7<15><12> 

TYPE @ SCNTLC sTYPE A CONTROL-C 

CLR @STFS sCLEAP THTERRUPT ENABLE 


Mov 2(SP),PS sPETASTATE PREVICUS PS 
JSR PC, OPRC¥D sPROCESS OPERATOR COMMAND 
MOV REPRI,PS dLOAD PSw TC LOCK OUT TTY ABD RECE 
Tst @STKB sCLEAR DOWE FLAG 
MOV #TE,eSTes sEMABLE INTERRUPTS 
RTI sPETURN 
1$3 cmMPe #7,2$ ZCHECR YF CONTROL CG 
BFQ 5$ sYES, GET WFe SWITCH RECISTER VALUE 
TYPE 22$ SPRIGT CHARACTEF 7¢€15><12> 
3$3 RTI Z RETURN 
5$3 cCwP #SWREGS, SuP SCHECE TF SOFTRARF SWITCH REG 
BWE 3$ 3NC, RETURD 
CMPB #1,$AUTCB sCHECRK YF IN AUTC ACCEPT MOLE 
BEQ 3$ sVES, RETURN 


TYPE @SCNTLG 
TYPE @ShSuP 


sTYPE CCATECL G 
sTYPE OLD SWITCH FECISTER 


MOV SWREG,-(SP ) 
JSR PC, BIROCT 
TVPE @SmhNew 
CLR @STFS 3GG INTC FLAG CCE 
19$: CLR -(SP) S3CLEAR COUNTER 
CLR -(SP) 33THE BREW SUR 
752 TSTe QSTFS 33;CHAR THERF? 


SEG 0223 


B2 








RK611/RK06 PERFORMANCE EXERCISER PATNDEC DZR6P-8 
11-AUG-76 00:00 


_ | OZR6PB.P11 


053130 


053132 
053136 


053142 
053146 
053150 
053154 
053160 


053162 
053166 
053170 
053174 
053176 
053204 
053210 
053214 
053222 
053224 
053230 
053234 
053736 
053242 
053244 
053250 
053254 
053256 
053260 
053262 
053264 
053270 
053274 
053276 
053302 


053304 
053305 
053311 


100375 


117746 
042716 


021627 
001005 
104401 
062706 
000757 


021627 
001016 
005766 
001403 
016677 
062706 
104401 
012777 
000002 
004737 
021627 
002420 
021627 
003015 
042726 
005766 
001403 
006316 
006316 
006316 
005266 
056616 
000713 
104401 
000724 


000 
077 
136 


126010 
177600 


000025 


052655 
000006 


000015 
000004 
000002 
000006 
001165 
000100 


052074 
000060 


000067 


000060 
000002 


125734 


125722 


000002 
177776 


001164 


005015 000 
006503 000012 


17$: 


1852 


252 


SCNTLC: .ASCIZ /°C/<15><12> 


BPL 


uors 
BIC 


BYTE 


MACY11 30€1046) O1-GFC-77 14:15 PAGE 202 
TK SERVICE ROUTINE (ORLY CONTROL C TS RECRIZED) 


7$ 


@STKB,-(SP) 
@#°C177,(SP) 


(SP), 425 
10$ 

a SCRTLU 
#6,SP 
19$ 


(SP), 815 


11$ 
2(0SP),@SuR 
#6,SP 
@SCRLF 
8100,8$TKS 


PC, STYPEC 
(SP), #60 
18$ 
(SP),#67 
18$ 

860, (SP)¢ 
2(SP) 

17$ 

(SP) 

(sP) 

(SP) 
2(SP) 
-2(SP),(SP) 
7$ 


7 SQUES 
20$ 


eASCIZ /7/¢€15><¢12> 


331F WOT TRY AGAIN 


3sPTCK OF CHAP 
3eMAKE IT 7-BIT ASCII 


3391S TT A CONTROL-U? 
dsBPARCH TF ACT 

33YES, ECHO CONTRCL-U (“U) 
JsIGHORE PREVIOUS INPUT 
SSLET°S TRY IT ACAI 


a31S IT A <Ch>? 

33BRAWCR TF BC 

s3VES, TS IT THE PIRST CHAK? 
33BPANCH IF YES 

sFSAVE FEW SUP 

3;CLEAR UP STACK 

s3ECHO <CR> ARD <LF> 
33RE-FMABLE TTY KED INTERRUPTS 
dsRETURA 

37ECHO CHAR 

33ChAR < 0? 

33BRAWCR TF YES 

33CHAR > 77 

33BP ARCH IF YES 
3>STKIP-OFF ASCII 

331S THIS TRE FIRST CHAP 
37BRAWCR TF YES 

3700, SHIFT PRESERT 

33 CHAR OVER TO MAKE 
33 ROOM FOR AEW ORE. 
37KEEP CCONT CF CHAR 
33SET IN WEW CHIE 

33GET THE BFXT CHE 
S3TYPE ?<CRO<CLFD 
s3SIMULATE CCHIECL-0 


sSTORAGE POR QUESTICNABLE INPUT 
sCCWTPCL-C 


eS8TTL OCTAL TO BINARY CCAVERSTIOW PCUTINE 


33 Rearasaeaeaeneneaeeaaaenanagnanavacagesavaanaeanaanansasananaeanea 


3 


THIS ROUTINE WILL CPECK A STKING OF ASCII CHARACTERS TERPIBATED 
WITH & NULL <000> CP COPMA. TF THE CHARACTERS AKE LEGAL 

IT WILL GENERATE TWO BINARY WORDS PLACTAG THE (OW 16 BITS 

OW THE STACK AND THE HIGH 16 BITS IW LOCATION $RIOCT. 


MOV 
JSR 


<ADDRESS OF ASCII STRINCD,-(SP) 


PC, OCTBIN 


<ADDRESS OF EPRCR RETURED 


RETURN 


SEC 0274 


Ca 








9153 
9154 
9155 
9156 
9157 
9158 
9159 
9160 
9161 
9162 
9163 
9164 
9165 
9166 
9167 
9168 
9169 
9170 
9171 
9172 
9173 
9174 
9175 
9176 
9177 
9178 
9179 
9180 
9181 
918? 
9183 
9184 
9185 
9186 
9187 
916" 
9189 
9190 
9191 
9192 
9193 
9194 
9195 
9196 
9197 
9198 
9199 
9200 
9201 
9202 
9703 
9204 
9205 
9206 
9207 
9208 


DZR6PB.P11 


053316 
053320 
053322 
053324 
053330 
053332 
053334 
053336 
053340 
053344 
053346 
053352 
053354 
053360 
053762 
053364 
053366 
053370 
05337? 
053374 
053376 
053402 
053404 
053406 
053410 
053414 
053420 
08342? 
053424 
053426 
053432 


053434 
053436 
053440 
053442 
053444 
053446 
053450 


010046 
010146 
010246 
016600 
005001 
005002 
112046 
001423 
121627 
001420 
122716 
003030 
122716 
002425 
006301 
006102 
006301 
006102 
006301 
006102 
042716 
062601 
00075? 
005726 
010166 
010237 
012602 
012601 
012600 
062716 
000207 


005726 
012602 
012601 
012600 
013616 
000207 
000000 


000010 


000054 
000060 
000067 


177770 


000010 
053450 


000002 


RK611/RFO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
11-AUG-76 00:00 


a 
—— 
OCTBIN: MOV RO,-(SP) sSAVE &O 
MOV R1,-(SP) sSAVE R1 
uov R2,-(SP) sSAVE R? 
“ov 10(SP),R0 sCET ADDEPSS CF ASCII STHIBC 
CLR R1 SCLEAR DATA BORTS 
CUR k? 
2$3 wove (RO )4,-C(SP) sPICK TRIS CHARACTER 
BEG 3$ 31f ZFRC CET CUT 
CMPB CSP),8°s sCHECK TF COMPA 
BEQ 3$ STF COMPA GET OUT 
cuPR $°0,(SP) SVARE SURE THIS CRARACTER IS 
BCT 4$ 3 AB CCTAL CIGIT 
CMPB 8°7,¢CSP) 
BLT 4s 
ASL a1 3 *2 
&OL R2 
ASL —XR 3 24 
ROL R2 
ASL R1 3 *8 
ROL R2 
BIC @°C7,(SP) sSTRIP THE ASCII JUBK 
aDD (SP )e,R1 sADD THIS OICIT 
BR 2s LOOP 
3$3 tst (SP) sCLFAW PARTIAL FECH STACK 
nov R1,10(SP) sSAVE RESOLT 
MOV R2,SHIOCT 
mov (SP )¢,R? SPESTCRE R2 
nov (SP)¢,R1 SPESTORF P1 
Mov (SP)¢,R0 SPESTOKE RO 
aodD #2,(SP) SADJUST RETORE 
RTS Pc sPETURD 
4$3 Tst (SP )« sCLEAW OUP PARTIAL FRUM STACK 
Mov (SP)¢,R2 SPESTORE R2 
nov (SP)¢,R1 sPESTCRE P1 
MoV (SP )e,R0 SRESTORE RO 
Mov @(SP)¢,(SP) sPUT ADDRESS CF ERRCKR RCUTIBE CH STACK 
RTS PC 3GC ERCCESS ERSCE 
SHIOCT: .WORD 0 sHIGH ORDER BITS CO HERE 


MACY11 30(1046) O1-CFC-77 14315 PACE 203 
OCTAL TO PINARY CONVERPSTOR ROUTINE 


eSBTTL DECIMAL TO PIWARY CONVERSTON ROUTINE 


3 peetterenesekenaaanasenaanaaaaananasaaeaaaaasenesaananaaaeanaenenne 


3? 

3* THIS ROUTINE WILL CHECK A STKING OF ASCII CHARACTERS TERPIBATED 
3* WITH A WULL <000> CR CCWMA. TF THE CHARACTERS ARF LEGAL, 
3% If WILL GENERATE & BINARY WORD PLACING IT CN TRE STACK. 
s 

3*CALL 

3° mov CADDRFSS CF ASCII STHINGD>,-(SP) 

3* JsR pc, DECBIN 

3* <ADDRESS OF ERROR RETURN 

>* RETURN 

3* 











RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-P 
11-AUG-76 00:00 


DZR6PB.P11 


9209 
9210 
9211 
9212 
9213 
9214 
9215 
9216 
9217 
9218 
9219 
9220 
9221 
9222 
9223 
9224 
9225 
9226 
9227 
9228 
9229 
9230 
9231 
9232 
9233 
9234 
9235 
9236 
9237 
9238 
9239 
9240 
9241 
9242 
9243 
92744 
9245 
9246 
9247 
9248 
9249 
9250 
9251 
9252 
9253 
92754 
9255 
9256 
9757 
9258 
9259 
9760 
9261 
9262 
9263 
9264 


053452 
053454 
053456 
053460 
053464 
053466 
053470 
053474 
053476 
053500 
053502 
053504 
053510 
053512 
053516 
053520 
053524 
053526 
053532 
053534 
053536 
053540 
053542 
053544 
053546 
053550 
053554 
053556 
053560 
053562 
053564 
053566 
053570 
053574 
053576 
053600 
053602 
053606 


053610 
053612 
053614 
053616 
053620 
053622 


053624 


010046 
010146 
010246 
016600 
005046 
005002 
122710 
001001 
112002 
112001 
001427 
120127 
001424 
122701 
003034 
122701 
002431 
032716 
001026 
006316 
011646 
006316 
006316 
062616 
102420 
162701 
060116 
102414 
000747 
00570? 
001401 
005416 
012666 
012602 
012601 
012600 
062716 
000207 


005726 
01260? 
012601 
012600 
013616 
000207 


010046 


000010 


000055 


000054 
000060 
000071 
170000 


000060 


000010 


00000? 


MACY11 30€1046) O1-DFC-77 14:15 PAGE 204 
DECTMAL TO BINARY CONVERSTON ROUTINE 


JP TAAAMAAAAAAAAAAAARAARAAAARAATHHAAASAAALAGAAAHAAAARARHARORSAAHAAHASS 


DECBIN: MOV 
nov 


mov 
nov 
CLa& 


2$3 MOVB 


3$3 Tst 


ATS 


eSBTTL ROUTINE TO SIZE MFRORY 


RO,-(SP) 

R1,-(SP) 

R2,-C( SP) 

10(SP),R0O 
-(SP) 


$ 
CRO) o,R2 
CRO)e,R1 


5 

#°9,R1 

5$ 
#170000,( SP) 
S$ 


(SP) 
(SP),-C(SP) 
(SP) 

(SP) 
(SP)¢,(SP) 
58 


(SP) 

(SP )¢,10(SP) 
(SP)¢,R2 
(SP)e,R1 

(SP )¢,k0 
#7,(SP) 

Pc 


(SP De 
(SP)¢,R2 
(SP)¢,R1 
(SP De, RO 
@(SP)+,(SP) 
PC 


SSAVE RO 

sSAVE 1 

sSAVE R&R? 

gCET ADDRESS CF ASCII STRING 
SCLEAR DATA BCED 

sSICh SET POSITIVE 

sSEE TF A MTBUS SIGH 

sBRABCH IF BO HIBUS SIGH 
SSAVE FCE LATER USE 

sPICKOP TRIS CHARICTER 

sCET OUT IF ZERO 

aCHECE TF COnPA 

sCET CUT TF CCRRA 

SPAKE SURE THIS CHARACTER: IS 
3 A DICIT PETWEER 0 6 S 


sDON°T LET PUPBER CFT TO BIC 

JBRABCH IP RUPBER WOULD OVERFLOW 
*3 

sSAVE FOR LATER 

a *4 

3 *0 

3 *1¢ 

sOVERPLOW ISB°T ALLOWFD 

SSTRIP AWAY TRE ASCTI JUBE 

30D Th THIS CICIT 

ZOVERPLOW ISH°T ALLCBED 

sLO0r 

SCHECK TF NUPBEP TS BEGATIVE 

sPRABCH IF WC 

SYES--BEGATE THE BUPBER 

sSAVE RESULT 

SPESTCRE 2 

sPESTORE Ri 

SRESTORE RO 

ZADIUST RETURN 

sRETURS 


SCLEAN PARTIAL RUPBEK FROM STACK 
SPESTCRE R2 

sRPESTORE Pl 

SRESTORE RO 

gPUT ADORFESS CF ERKCR OF STACK 
3CC PRCCESS EFECR 


zp eeAeaaaeseagesanasaeasasnanasaagansanesasanasansagaananassaanes 


7*CALLs 
3* JSR 
3* RETURN 


PC, SSIZE 


3*S$LSTAD WILL CONTAIN THE LAST AVAILABLE MEPCHY LOCATION 


$SIZE: MOV 


RO,-(SP) 


J3SAVE RO ON THE STACK 


SEC C2zé 


Ea 











RE611/RKO6 PERFORMANCE EXERCISER MAINDEC DZREP-F 


DZR6PB.P11 


9265 
9266 
9267 
9268 
9269 
9270 
9271 
9272 
9273 
9274 
9275 
9276 
9277 
9278 
9279 
9280 
92861 
9262 
9283 
9284 
9285 
92786 
9787 
9288 
9289 
9790 
9291 
9292 
9293 
9294 
9295 
9296 
9297 
9298 
9299 
9300 
9301 
9302 
9303 
9304 
9305 
9306 
9307 
9308 
9309 
9310 
9311 
9312 
9313 
9314 
9315 
9316 
9317 
9318 
9319 
9320 


053626 
053630 
053634 
053640 


053642 
053644 
053650 
053656 
053662 
053664 
053666 
053670 
053674 
053676 
053702 
053706 
053712 
053714 
053716 
053720 


053722 
053730 
053736 
053740 


053742 
053746 
053754 
053760 
053762 
053766 
053770 
053776 
054004 
0540172 
054016 
054022 
054026 
054034 
054042 


054046 
05405? 
054060 


11-AUG-76 00:00 


010146 
013746 
013746 
010600 


104400 
012637 
012737 
012701 
005711 
005721 
000775 
162701 
010006 
012637 
012637 
010137 
012601 
012600 
000207 
000000 


017737 
012737 
000000 
000776 


605037 
012737 
005237 
001375 
005337 
001372 
012737 
012737 
012737 
012706 
104401 
004737 
112737 
013777 
000137 


000000 
005015 
006522 


000006 
053670 
020000 


000002 


000006 
000004 
053720 


125212 
053742 


054046 
000144 
054046 


054050 


0*3722 
000340 
000340 
001100 
054052 
043072 
177777 
001404 
007150 


000000 
047520 
000012 


000004 


001404 
000024 


05 4050 


000024 
000026 
000036 


001361 
125076 


042527 


MACY11 30(1046) O1-CEC-77 14315 PACE 205 
ROUTINE TO SIZE MEMORY 


dSSAVE R1 OF THE STACK 


nov R1,-(SP) 

nov QPERPRVEC,-(SP) 22SAVF PRESERT EGECE VECTOR PS & FC 
nov @RERRVEC*2,-(SP) 

nov SP, PO JISAVE TRE STACK POINTER 


33SET THE ERRVEC PS TO THE PRESENT PS 
TRAP 33PUSH CLD PSY ART PC OW STACF 


mov (SP), @#ERRVEC?S?2 S3SAVE THE PSY IB QSERRVEC?2 
nov #7$, @FERRVEC 33SET FOR TIMEOUT 
nov #20000,81 s3FTEST ADDRESS 
1S: Ttst (Pl) s3TEST THIS ADDRESS 
Ttst (R1 Do 33STEP TO BEXT ADDRESS 
BP 1s a3TRY ANCTHES 
2$3 sus #2,P1 330P0P BACK 
mov RO, SP SSRESTGRE TRE STACK 
“ov (SP)¢, @FEPRVEC*? S;PRESTORE ERROR VECTOR 
nov (SP) o, @PERRVEC 
nov R1,SLSTAD s3LAST ADDRESS 
nov (SP )¢,R1 deRESTORE R1 
nov (SP)¢,R0 sIRFSTORE RO 
TS PC 


SLSTADs .WORD 0 s3CONTATNS THE LAST ADDRESS 


pp eee eneavrasasacaaenaavaraesananensanssanaanesananansaaseanaeasess 


-SBTTL POWER DOWN AND UP GCUTIKES 
ZPOWER DOWN ROUTINE 


SPURDH: MOV @SUR,SAVSUR SSAVE SWITCH RECISTER 
nov SSPURUP,PURVEC ;SET UP VECTCE 
HALT 
BR 222 sFanc UP 


sPOWER OP ROUTINE 


$PWRUPs CLR $PuPCT sWATT LOOP FCR THE TTY 
nov #100.,$PURCT¢2 

1$s Isc S$PURCT SWATT FOR TRE INCFEPENT 
BRE 1$ 3 OF BORD 
DFC S$PuURCT¢2 
BWE 1$ 
nov @SPURDN,PURVEC 3SET PCWER CCWR VECTCR 
MOV #PR7I,PURVECe2 sPRIGPITY 7 
mov SPRTI,ZTRAPVECe? j3LOCK OUT ALL INTERRUPTS FOR THAAFS 
nOV #STACK,SP STMITIALIZE STACK 
TYPE 7 SPCUFR SPEPCRT POWFES FAIL 
JSR PC, PRITIM sPRIGT TIME 


move @-1,FLAG SSET FLAG FOR RESTART SFQUENCE 
nov SAVSWR,@SUR SRESTICRE SwITCH REGISTER 
Jue PWRSRT SRESTART PRCCKAP 


SPURCT: .WORD 0,0 SWAIT COUNT FORK TTY 
SPOWERS .ASCIZ €15>€12>/POWER/<15><12> 


EVEN 
eSBTTL INTEGER MULTIPLY ROUTINE 


PP eeaeeasaneakasanaeareganasaanagagsaaeagagasanaansasanaesaseaenes 


S€¢ 0227 


fr 











ow 


< 
RKG11/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30(1046) O©1-DEC-77 14215 PACE 206 
OZR6PB.P11 11-AUG-76 00:00 INTEGER MULTIPLY ROUTINE €£C 0226 4 
9321 3* 
932? 3*CALL € 
9323 3* mov MOLTIPLEK,-(SP) 
9324 3* nov MULTIPLICAND, -(SP) 
9325 3° JSR PC, $MULT q 
9326 3* RETORW 23PRCDUCT If OM TRE STACK 
9327 3* 
9328 3* STACK PRODUCT € 
9329 32 — — — 
9330 3* 
9331 af TOP Lse8°s € 
9332 3* +2 uSB°S 
9333 3* 
9334 PP TMAAAAALASARAAAAAALAHRAARARARAASHAAHHASHHAAAAHAAAHARAARAAAARAHAEEES € 
9335 
9336 054064 SMULT: 
9337 054064 010046 mov RO,-(SP) 39PUSH RO OW STACR q 
9338 054066 010146 wey R1,-(SP) 33PUSH Rl OW STACK 
9339 054070 010246 nov R2,-(SP) 33PUSR R2 OW STACK 
9340 054072 0102346 nov R3,-(SP) 33P0SH R3 OW STACE 4q 
9341 054074 010446 nov R4,-(SP) 33PUSH R4 OW STACK 
9342 054076 010546 mov RS,-(SP) 23PUSR PS OR STACK 
9343 054100 016605 000016 mov 16(SP),R5 STORE POLTIPLICAED € 
9244 054104 016603 000020 nov 20(SP),83 STORE WULTIPLIER 
9345 054110 005000 CLR RO 3CLEAR RICH CROES wCKOS 
9346 054112 005001 CLR R1 € 
9347 054114 005002 CLR k2 
9348 054116 005004 CLR R4 
9349 054120 012746 000041 nov 841,-(SP) sMCVE 33 DEC TC CCURTER e 
9350 054124 006000 1$: ROR RO 
9351 054126 006001 ROR R1 
9352 054130 006002 ROR R2 SHIFT TC aCe € 
9353 054132 006003 ROR R3 
9354 054134 103003 Bcc 2$ 3"O CARRY WO ADD 
9355 054136 060501 aoD RS,R1 € 
9356 054140 005500 adc KO ZADD DCUBLE PRECISICR Tf OOTATH DEW PARTIAL 
9357 054142 060400 ADD R4,R0 PROCUCT 
9358 054144 005316 2$: DEC (sP) ;DECKEMERT COUBTER ¢ 
9359 054146 001366 BNE is 
9360 054150 005726 TST (SP)« REMOVE COUNTER 
9361 054152 010766 000020 nov R2,20(SP) gCET LEAST SICHIFICANT BITS 4 
9362 054156 010366 000016 nov R3,16(SP) dCET MOST SICHIFICART BITS 
9363 054162? 012605 nov (SP)o,R* 33PCE STACK IRTC FS 
9364 054164 012604 nov (SP)o,R4 33POP STACK INTO F4 ¶ 
9365 054166 012603 nov (SP)*,R2 33POP STACK INTC P3 
9366 054170 012602 nov (SP)¢,R? 33PO0F STACK ITC 82 
9367 054172 012601 nov (SP)¢,R1 39POP STACK INTO P1 € 
9368 054174 012600 nov (SP )e,RO 33POP STACK INTO FO 
9369 054176 000207 RTS Pc ;PETURD 
9370 | 
9371 
937? -SBTTL RANDOM NUMBER GENERATCR ROUTINE ¢ 
373 
9374 JP eet eaaaeasasaenagaggesscanasaragagaenanenesaanssHensasanseasase 
9375 3*THIS ROUTINE IS A DOUBLE PRECISION PSFUDG RANDCY RUMBER GENERAICR 
9776 s*WITH A RAWGE OF © TC 2(¢433)-1. @ 
€ 





RE611/RKO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-B 


O7R6PR.P11 


9377 
9378 
9379 
9380 
9361 
938? 
93863 
9364 
9385 
9786 
9387 
9388 
9789 
9390 
9391 
9392 
9393 
9394 
9395 
9396 
9397 
9398 
9799 
9400 
9401 
9402 
9403 
9404 
9405 
9406 
9407 
9408 
9409 
9410 
9411 
9412 
9413 
9414 
9415 
9416 
9417 
2418 
9419 
9420 
9421 
9422 
9423 
9424 
9425 
9426 
9427 
9428 
9429 
9430 
9431 
9432 


054200 
054200 
054202 
054704 
054206 
054212 
054216 
054222 
054224 
054226 
054230 
054232 
054236 
054240 
054244 
054250 
05425? 
054256 
054262 
054266 
054270 
054272 
054274 
054276 
054300 


054302 
054302 
054304 
054306 
054310 
054312 
054314 


11-AUG-76 00:00 


010046 
010146 
010246 
013700 
013701 
012702 
006300 
006101 
005202 
001374 
063700 
005501 
063701 
062700 
005501 
062701 
010037 
010137 
012602 
012601 
012600 
000207 
176543 
123456 


010046 
010146 
010246 
010346 
010446 
010546 


054300 
054276 
177771 


054300 


05 4276 
001057 


047401 
054300 
054276 


MACYIL 30€1046) O1-DEC-77 14315 PAGE 207 


RANDOY RUPBER GENERATOR ROUTINE SEC 0239 
3*CALL?: 
3* JSk PC, SRAND 33CALL THE ROUTINE 
3* RETURN SIRETORE HERE TRE RABDOP 
3¢ 27N0MBE® WILL BE Im 
p* 33SHINUM, SLONUM 
SRAND? 
nov RO,-( SP) 33PUSF RO ON STACK 
nov R1,-(SP) 33P0SH R1 OW STACE 
nov R2,-(SP) p9PUSH RZ OW STACE 
wov $LOnU™, 0 33SET BO WITH LOB 
“ov SHINUM, PL 33SFT R1 WITH BICF 
“ov §-7,82 379SET SHIFT COURT 
1$: ASL RO 33SPIPT RO LEPT AND 
ROL k1 ssROTATE CARRY INTO k1 ABD 
Inc R2 dSCHECK FOR DOBE 
BRE is Z3CORTINUE SHIFT LOCP 
ADD S$LONUM, PO 334DC HUMBER TO BAKE KX 129 
aoc R1 SSPRCPOCATE CARRY 
AOD SHINUP,RA 33ADC BOMBER TC BAKE X 129 
aco $1057,R0 33400 LOW CONSTANT 
avc R1 sIPROPOCATE CARRY 
avD #47401,?1 3300 HIGH CORSTART 
“ov RO, $LONUK 33SAVE FO 
nov R1,SHISOM Z3SAVE PL 
nov (SP)¢,R2 33POF STACK I8TC F2 
nov (SP)e,81 33PO0F STACK I8TC F1 
nov (SP)o,R0 33POP STACK ITO FO 
RTS ec 33RE TORN 
SHINUWs .WORD 176543 
SLONUPs .WORD 123456 
eSB8TTL SINGLE/DOUBLE LEACTH BINARY 10 DECIMAL ASCII CONVERT ROUTIBES 
33 Qeaenggenaenaaeaanaanananasaaesanaaaganananaazaaaaananaanaanasasa2na2eeaae 
3* 
3° TRESE ROUTINE WIL CONVERT A 16-PIT C& 32-PIT BINARY BUMPER 
3* TO AN UNSIGRED DECIMAL (ASCII) NUPBFE. 
3* 
3*CALL MOV sPNTR,-(SP) SPOTATER TO LOW BCRD OF BIBARY BUPBER 
3* JSR PC, $08 2D 
3* RETURN ;DECIMAL RUPBER IN SDECUL 
J 
3*CALL MOV NUM, -(SP) 
3* JSR PC,$SR2C 
3° RETURN SDECPAL BUMPER Ih S$CDECVL 
e 
3 peeeaaaaesesaaenaaageaensagaesaaeaaaeaeasasanaasasanaananasatane 
$S82D: 
“OV RO,-(SP) psPUSH PO ON STACE 
uov R1,-(SP) 33PUSH RL CH STACK 
nov R2,-(SP) 33PUSR R2 OF STACK 
“ov R2,-(SP) 33PUSH R39 OR STACE 
ucy R4,-(SP) Z7PUSH R4 CH STACK 
nov R5,~-(SP) 37PUSH RS OW STACK H 
a. 
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OZR6PB.P11 


9433 
9434 
9435 
9436 
9437 
9438 
9439 
9440 
9441 
9442 
9443 
9444 
9445 
9446 
9447 
9448 
9449 
9450 
9451 
9452 
9453 
9454 
9455 
9456 
9457 
9458 
9459 
9460 
9461 
946° 
9463 
9464 
9465 
9466 
9467 
9468 
9469 
9470 
9471 
9472 
9473 
9474 
9475 
9476 
9477 
9478 
9479 
9480 
9481 
94862 
9483 
9484 
9485 
9486 
9487 
9488 


054316 
054322 
054324 
054332 
054336 
054342 


054344 
054344 
054346 
054350 
054352 
054354 
054356 
054360 
054364 
054366 
054370 
054376 
054402 


054406 
054412 
054414 
054416 
054420 
054422 
054424 
05442€ 


054430 
054432 
054434 
054436 
054440 
054444 
054446 
054450 
054452 
054454 
054456 
054460 
054462 
054464 
054466 
054470 
054472 
054474 
054500 


054502 
054504 
054506 
054510 
054512 
054514 


11-AUG-76 00:00 


016601 
005002 
012737 
012704 
012705 
000421 


010046 
010146 
010246 
010346 
010446 
010546 
016602 
012201 
011202 
012737 
012704 
012705 


012700 
005003 
161401 
005602 
161502 
002402 
005203 
000772 


062401 
005502 
062402 
022525 
052703 
110320 
005327 
000000 
001357 
105020 
012605 
012604 
012603 
012602 
012601 
012600 
012616 
104401 
0006207 


145000 
035632 
160400 
002765 
113200 
000230 


000016 
000005 


054526 
054530 


000016 


000012 
054502 
054504 


054552 


054552 


054450 


054450 


MACY11 30(1046) 


O1-CEC-77 14315 PACE 206 


STIUGLE/OCUBLE LENGTH PIBARY TC CECIMAL ASCIT CCRUFRT POOUTIBES 


$0820: 


$P®2D: 
$2DEC? 
2$3 


3$3 


$DECNTs 


STNPURSs 


145000 
35632 
160400 
2765 
113200 
230 


16(SP),R1 
R2 


es, SOECHT 
asTueu,R4 
eSTMPUSI, RS 
$P20 


RO,-(SP) 
R1,-(SP) 
R2,-C SP) 
R3,-CSP) 
R4,-( SP) 
R5,-(SP) 
16(SP),R2 
CR2)¢,R1 
CP2),R2 
#10.,SDECNT 
eSTWPUR,R4 
ESTHPURE2, KS 


aSDECTL, RO 
R3 


(R4)e,R1 
R2 


' (R4)¢,R2 


CRS De, (PS)e 
#°0,R83 

R3, (RO De 
(PC)¢ 

0 

$2DEC 

(RO Do 

(SP )¢,R85 
(SP) eo,R4 
(SP)¢,R83 
(SP )¢,R? 
(SP) ¢,R1 
(SP)e@,R0 
(SP)¢, (SP) 
@ SDECUL 

Pc 


sSTOKE WUMBER IW Fi 

sCLEAP POST STICRIPICANT BITS 
sSET OF FCR s CCHVERSTORS 
ZADDRESS PCR S POWER 


sSTAGT CCRVESSICH 


3sPUSH RO OW STACK 
33PUSH Pl CR STACK 
33P0SRh R2 OW STACK 
33PUSH R23 OR STACE 
37PUSH 4 CBR STACK 
33P0S" PS OF STACE 
SPICKUP DATA POTETER 
SPICKUP BIBARY BUPBFR 


sSET OP TC DC 10 CONVERSIONS 
SADDEESS OF TER POWER 


sCET ADDRESS OF “SDECVL® STRING 
sCLEAR PARTTAL 
sSUBTRACT TER PCKER 


sBRABCH IF TE® PCWER TOC LabCE 
3ADD 1 TO PARTIAL 
sLoor 


SRESICRE SUBTRACTED VALUE 


SPCVE TC BERT TER PCHEK 
sCHANGE IT TO ASCII 
sSAVE If 

sDORE? 


sBRABCH IP HC 
STERPINATOR 

39POF STACK I®TC FS 
37POF STACK INTC F4 
33POP STACK INTO F3 
33POP STACK IfTO R2 
33P0F STACK IBTC F1 
33POF STACK INTC FO 
SSETUP STACK PCR PETURN 


sPETUPN 
21. 06 08 
31.0E08 
31-0E07 


fe¢ 623¢ 
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9489 
9490 
9491 
9492 
949% 
9494 
9495 
9496 
9497 
9498 
9499 
9500 
9501 
9502 
9503 
9504 
9505 
9506 
9507 
9508 
9509 
9510 
9511 
9512 
9513 
9514 
9515 
9516 
9517 
9518 
9519 
9520 
9521 
9522 
9523 
9524 
9525 
9526 
9527 
9528 
9529 
9530 
9531 
9532 
9533 
9534 
9535 
9536 
9537 
9538 
9539 
9540 
9541 
9542 
9543 
9544 


054516 
054520 
054522 
054524 
054526 
054530 
054532 
054534 
054536 
054540 
054542 
054544 
054546 
054550 
05455? 


054566 
054574 
054602 
054604 
054612 
054612 
054614 
054616 
054622 
054624 
054632 
054634 
05464? 
054644 
054650 
054656 
054662 
054664 
054670 
054672 
054674 
054700 
054702 
054706 
054714 
054716 
054724 
054732 
054736 
054742 
054744 
054744 
054750 
054752 
054756 
054760 
054764 
054766 


11-AUG-76 00:00 


041100 
000017 
103240 
000001 
023420 
000000 
001750 
000000 
000144 
000000 
000012 
000000 
000001 
000000 
000014 


112737 
112737 
000403 
112737 


010046 
010146 
105737 
001450 
122737 
001031 
132737 
001425 
017600 
062766 
005737 
001375 
010037 
105720 
001776 
163700 
006200 
010037 
012737 
000413 
017637 
062766 
013746 
004737 
000000 


105737 
001416 
005737 
001413 
005737 
001375 
017637 


000001 
000001 


000001 


055030 
000001 
000100 
000004 
000002 
001170 


001204 


001204 


001206 
000004 


000004 
000002 
177776 
051662 
055032 
001210 
001170 


055032 
055030 


055032 


001210 
001211 


000004 


001170 


054742 
000004 


001172 


SINGLE/DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINES 


STHPUs 


041100 
17 
103240 
1 
23420 
G 

1750 

0 


144 
0 
12 
0 

1 

0 


S$DECVL: .PLFB 
eSBTTL APT COMMUNICATIONS ROUTINE 


MACY11 30(1046) O1-DEC-77 14315 PACE 209 


12. 


Se€¢ €233 
31.0606 

31.0605 

31.0804 

31.0E03 

31-0602 

31.0601 

31.0600 

SPESERVE STCEACE FCF ASCIZ STFING 


3 FTMAAAAARSARARAARAAAAAKRAAHAAHSAHHAARARAAASASEAAADES X&I 


$aTY1is 
S$PTY3: 


SATY4: 
SATYC? 


1$: 


2$3 


3$% 


4S3 
5$3 
10$: 


11$: 


#1,SFPLC 
#1, SMFLC 
saTYCc 

#1,S$FFLCG 


RO,-(SP) 
R1,-(SP) 
SMFLG 


S$ 
SAPTENV, SERV 
3$ 


@APTSPOOL, SENVH 
3 


$ 
@4(SP),F0 
#2,4(SP) 
S*SCTYPE 


i$ 
RO,SMSGAD 
CRO Do 


2$ 
S¥SCAD,KO 
RO 


RO, SMSGCLGT 
#4, SMSCTYPE 
5 


$ 
@4(SP),4$ 
62,4(SP) 
177776,-(SP) 
——— 


SPFLG 
12s 

Seay 

12$ 
SMSCTYPE 


11$ 
O4( SP) ,SFATAL 


33TC REPCRT FATAL EPROR 
33T0 TYPE A MESSACE 


33TO OBLY GEFCET FATAL ERRCH 


33PUSH RO OW STACK 
33PUSH R1 OW STACK 
33SFOULD TYPE A MESSAGE? 
331P WOT: BE 
PPOPEPATING UNDER APT? 
331F BCT: BR 
33SPOULD SPOOL PESSAGCES? 
2215 BOTs BR 
33GET MESSACE ADCP. 

378URP RETURN ADDP. 
33SEE IF DORE &/ LAST Z¥ISSION? 
2215 BOTs WATT 
33P0T ADDP Th MAITBCX 
s3FTHT ERD OF HESSACE 


33SUE STAPT CF PESSACE 
33GET MESSACE LEGTH If WORDS 
33PUT LENGCTR IB PAILBOX 
dSTELL APT TC TAKE PSC. 


33P0T MSG ADDR Ih JSR LIMKACE 
37B0PP RETURN ADDRESS 

33PUSH 177776 CH STICK 

s3CALL TYPE MACRO 


S3SHCULD PEPCET FATAL ERRCE? 
331F WOT: BR 

JIRUANING UNDER AFT? 

331° WCTs PE 

SSF IRISHED LAST HESSAGE? 
2215 BOTS WAIT 

33GE1 ERRCK g 


Ta 














& 
RKG11/REC6 PERFORMANCE EXERCISER MATNDEC DZR6P-8 MACY11 30(1046) 01-DRC-77 14315 PAGE 210 
DZR6PE.P11 11-AUG-76 00:00 APT COMMUNICATIONS ROUTINE $60 0222 é 
9545 054774 062766 000002 000004 ADO #2,4(SP) 33BURP RETURS ACDR. 
9546 055002 005237 001170 INC $MSGCTYPE geTELL APT TC TAKE ERROR r | 
9547 055006 105037 055032 12$: CLRB SFFLG PPCLEAR FATAL PLAC 
9548 055012 105037 055031 CLRR $LFtc 33CLEAR LOG FLAG 
9549 055016 105037 055030 CLRB SMFLG 33CLEAR NESSACE FLAC 6 
9550 055022 012601 nov (SP )o,R1 93POP STACK INTO P1 
9551 055024 012600 nov (SP)¢,R0 99POP STACK LPTC PO 
9552 055026 000207 RTS pc 27RETORN € 
9553 055030 000 SWFLG: .BYTE 0 39MESSGC. FLAG 
9554 055031 000 SLFLG: .BYTE 0 99LOC FLAC 
9555 055032 000 $PFLG: .BYTE 0 33PATAL PLAC @ 
9556 055034 oEVEN 
9557 000200 APTSIZE=200 
9558 000001 APTENV=001 @ 
9559 000100 APTSPOCL=100 
9560 000040 APTCSUP=040 
9561 eSBTTL TRAP DECODER @ 
> 
roe PPeAAeaeeaaeagavaaagaaagagaanesnasasanaAgasaanaaasesaganessaaaeneses 
9564 3*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP® INSTRUCTICH | 
9565 *AND USE IT TO INDEX TRROUCH TRE TRAP TABLE FOR THE STARTING ADORESS 
9566 3*OF THE DESIRED ROUTINE. THER USING THE ADDRESS CBTATHED IT WILL 
9567 3*GO TO THAT ROUTINE. € 
9568 
9569 055034 010046 STRAP: MOV RO,-(SP) PPSAVE PO 
9570 055036 016600 000002 nov 2(SP),RO 33CE1 TRAP ADDRESS 6 
9571 055042 005740 ts? -(R0) 33BACKUP RY 2 
9572 055044 111000 nove (RO), RO 33CE2 RIGHT BYTE CF TRAP 
9573 055046 006300 ASL RO 3POSITICH PCR THCERXING € 
9574 055050 016000 055070 nov STRPAD(RO),RO  331NDEX TO TABLE 
9575 055054 000200 RTS RO 3360 TO ROUTINE 
9576 @ 
9577 
9578 33THIS IS USE TO HANDLE THE "GETPRI® wacRo e 
9579 
9580 055056 011646 $TRAP2: MOV (SP),-(SP) 3 9NOVE THE PC COMR 
9581 055060 016666 000004 000002 nov 4(SP),2¢SP) 23mOUF THE PSY CLUB 
9582 055066 000002 atl #RESTORE TRE PSH | 
9583 
9584 -SBTTL TRAP TABLE 
9585 @ 
9586 Z*°THIS TABLE CONTAINS THE STARTING ACDRESSES CF 1HE ROUTINES CALLEC 
9587 2*BY THE “TRAP® IWSTRUCTION. 
958A @ 
9589 3 ROUTINE 
9590 ; — — 
9591 055070 055056 $TRPAD: .WORD $TRAP? | 
9592 055072 05166? $TYPE  $9CALL=TYPE TPAP01(104401) ITY TYPECUT SCOTIBE 
9593 
9594 @ 
9595 055074 052750 SPDCHR  3CALL=ROCHR TPAP*7(104402) TTY TYPEIN CHARACTER ROUTIAE 
9596 055076 052370 $RDLIN 33CALL=RDLIW TRAP¢3(104403) TTY TYPEIN STRING GCUTIRE @ 
€ 
Ka 
C 








RK611/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-B 


DOZR6PB.P11 


9597 
9598 
9599 
9600 
9601 
9602 
9603 
9604 
9605 
9606 
9607 
9608 
9609 
9610 
9611 
9612 
9613 
9614 
9615 
9616 
9617 
9618 
9619 
9620 
9621 
9622 
9623 
9624 
9625 
9626 
9627 
9628 


055100 
055106 
055114 
055122 
055130 
055131 
055136 
055137 
055144 
055152 
055154 
055157 
055164 
055172 
055200 
055205 
055212 
055220 
055226 
055731 
055236 
055244 
055251 
055256 
055264 
055272 
055300 
055306 
055314 
055317 
055324 
055337 
055340 
055346 
055347 
055354 
055362 
055370 
055376 
055404 
055412 
055420 
055426 
055427 
055434 
055442 
055446 
055451 
055456 
055464 
055472 
055476 
055504 
055512 


11-AUG-76 00:00 


042514 
050117 
051117 
040515 


037440 


044522 
046525 


000 
046114 
006477 
042504 
052123 
051114 
040440 
042516 

000 
052117 
043511 
005015 
051501 
020116 
042520 
046517 
020124 
047105 

000 
042514 
047105 
047503 
006504 


042520 
02012? 
040511 
051104 
044522 


040507 
051105 
041440 
042116 


005015 


042526 
042502 


043505 
000012 
020122 

000 
040505 
051523 
037504 


051501 
042524 
046515 
025012 


040522 
047111 
042524 
050117 
042526 
047111 
0S2111 
045503 


04452? 
046*25 


042526 
042524 
042513 


051104 
041440 
052116 


ASCII MESSAGES 


eSB8TTL 
TLLCOPs 


ILLCMD: 
OPROOO: 


OPROO1: 
OPROO2: 
OPROO3: 
OPROO4: 


OPROO7: 


OPRO10: 


OPRO11: 
OPRO123 


OPRO133 
* 


MACY11 30€1046) O1-DEC-77 14315 PAGE 211 
$&¢ €233 


ASCII MESSAGES 


eASCIT 


e ASCIZ 
eASCIT 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


 ASCIZ 


eASCIZ 


eASCIT 


eASCIZ 
eASCIZ 


eASCIZ 


/TLLEGAL CPERATCR COMPARE / 


4 =24€15><12> 
/ORIVE RUPBER / 


40 7 
/TLLEGAL?/¢<15><12> 
/UMDER TEST/ 


/ALREADY ASSIGBED?/<15><12> 


/BOT ASSICHED?/<15><12> 


/HAS BEEN DROPPED FROW TEST SEQUERCE/<15><12> 


/PLEASE EXTER COMMAND /<15><129/*/ 


JOPERATOR INITIATED ORGP DRIVE DURING WRITE PACKS 


<€15><12>/0RIVE BOYBER / 
40 7 
/ORIVE WRITE LOCKED/<15><12> 


/ALL ORIVES CURPERTLY UNDER TEST/<1£><12> 


Aa 








ae 
© 
RK611/8"06 PERFORMANCE EXERCISER MATBDEC DZROP-8 WACY11 30(1046) 01-DEC-77 14:15 PACE 212 
DZR6PR.P11 11-a0G-76 00:00 ASCII WESSACES £6¢ 6224 
9653 055520 054514 052440 042116 
9654 055526 051105 052040 051505 
9655 055534 006524 000012 
9656 055540 047516 042040 644522 OPRO14: .ASCIZ /BO DRIVE IN 0SE/<15><12> 
9657 055546 042526 044440 020116 


9658 055554 051525 006505 000012 

9659 055562 046101 044514 047107 OPROIS: .ASCIZ /ALLICHPENT PACK Th CRIVE/<15><12> 
9660 055570 042515 052116 050040 

9661 055576 041501 020113 047111 

966? 055604 042040 044522 042526 

9663 055612 005015 000 

9664 055615 052 042052 044522 ORUSTT: .ASCIZ /**DRIVE STATISTICS**/<15><12> 
9665 055622 042526 051440 040524 

9666 055630 044524 052123 041511 

9667 055636 025123 006452 000012 

9668 055644 005015 051104 053111 STTO00: .ASCIE <15><12>/DRIVE SERIAL BC. / 
9669 055652 020105 042523 044522 

9670 055660 046101 047040 0277117 


9672 055667 000003 STT100: .OLFB 3 

9673 055672 000 BYTE 0 

9674 055673 117 042122 051105 STTOO1: .ASCIZ /ORDERS PERFORRED / 
9675 055700 020123 042520 043122 

9676 055706 051117 042515 020104 t 


9678 055715 015 053412 051117 STT0023 .ASCIZ <15><€12>/HORDS WRITTEN*ESF / 
9679 055722 051504 053440 04452? 

9680 055730 052124 0471905 633052 

9661 055736 045465 000040 

9682 055747 005015 047527 04212? STTOO3: .ASCIZ <15><12>/NORDS READ*6SK / 
9663 055750 0620123 042522 042101 

9664 055756 033052 045465 000040 

9685 055764 005015 047523 052106 STTO04: .ASCIZ <15><12>/SOFT DATA E&ROPS/<15><12>/ ECC / 
9686 055772 042040 052101 0270101 

9667 056000 01105 047522 0£1522 

9688 056006 005015 020040 041505 


9690 056017 015 020012 051040 STTOO0S: .ASCIZ <15><12>/ REREAD / 
9691 056024 051105 040505 0620104 


9693 056033 015 020012 047440 STT006: .ASCIZ <15><€12>/ OFFSET / 
9694 056040 043106 042523 0270124 


9696 056047 015 044012 051101 STTOOTs .ASCIZ <15>¢€12>/MARD DATA ERPOPS / 
9697 056054 020104 040504 040524 
9698 056067 042440 051122 051117 


9700 056073 015 951412 042505 STTOO8: .ASCIZ <15><12>/SEEK INCOMPLETES / 
9701 056100 020113 O47111 047503 
9702 056106 050115 0425i:4 042524 


9704 056117 015 047412 042520 STT009: .ASCIZ <15><12>"OPERATIOW IRCOMPLETES/PISPOSITIONS * 
9705 056124 040522 044524 047117 

9706 056132 044440 041516 046517 : 

9707 056140 046120 052105 051505 

9708 056146 046457 051511 047520 








- 


RF611/RKO6 PEPFORMAWCE FXERCISER MAINDEC DZR6P-f 


D7REPB.P11 


9709 
9710 
9711 
9712 
9713 
9714 
9715 
9716 
9717 
9718 
9719 
9720 
9721 
9722 
9723 
9724 
9725 
9726 
9727 
9728 
9729 
9730 
9731 
9732 
9733 
9734 
9735 
9736 
9737 
9738 
9739 
9740 
9741 
974? 
9743 
9744 
9745 
9746 
9747 
9748 
9749 
9750 
9751 
9752 
9753 
9754 
9755 
9756 
9757 
9758 
9759 
9760 
9761 
9762 
9763 
9764 


056154 
05616? 
056165 
056172 
056200 
056705 
056212 
056220 
056226 
05673? 
0562456 
056250 
056256 
056260 
056766 
056274 
056300 
056206 
056314 
056322 
056330 
05633? 
056336 
056344 
056352 
056360 
056366 
056370 
056376 
056404 
056406 
056414 
056422 
056424 
056432 
056440 
056446 
056451 
056456 
056464 
056472 
056500 
056506 
056514 
056517 
050524 
05653? 
056540 
056543 
056550 
056556 
056557 
056564 
056572 
056600 
056603 


11-aUG-76 


044523 
020122 

015 
051105 
051117 

015 
020113 
046101 
042502 
00001? 

o1f 
050103 
000075 
053117 
020131 
051105 
040515 
047101 
051440 
020050 
000040 
024440 
047516 
051440 
051101 
050115 
00007£ 
045522 
051525 
000075 
045522 
041505 
000075 
047516 
052123 
042515 
005015 

12? 
052040 
044507 
043122 
041516 
052123 
005012 

123 
05212? 
052116 
036514 

12? 
051120 

000 

120 
042524 
051117 
042° 26 

060 


044524 

000 
047412 
042440 
020123 
050012 
042523 
047040 
020122 


000012 
020125 


051105 
047514 
000075 
020130 
0431223 
055111 
040515 


000075 
020056 
043117 
020105 
051101 


033060 
040440 


033060 
040440 


042516 
047105 
047515 

000 
040505 
020117 
020116 
051117 
020105 
047111 

000 
040524 
041511 
051105 

000 
030113 
047511 


051101 
051522 
042040 

040 
005015 


047117 


044124 
0£1122 

000 
041501 
044522 
046525 


042111 


040514 
042101 


051124 
051105 
020105 
035130 


043117 
053524 
047503 
051505 


041040 
042104 


653040 
042104 


044530 
020124 
054522 


054504 
042*02 
042520 
040515 
042524 
006507 


044524 
044440 
040526 


020066 
03652? 


042515 
043040 
04452? 


¥00012 


ASCII MFSSAGES 


STTO10: 


STTO11: 


STT0173 


STT0133 


svsooo: 


SYSO01: 


SV¥S002: 


SV¥S003: 


SYS004; 


SYS005: 


SYSOGE: 


SV¥S0073 


SYSOOR: 


SYS0093 


SYSO10: 


PaROOO: 


PAROO1: 


eASCIZ 


eASCIT 


SLB 


eASCIZ 


2 ASCIZ 


eASCIZ 


2 ASCI7Z. 


2 ASCIZ 


eASCI7 


2 ASCIZ 


eASCI7 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIT 


2 ASCIZ 


MACY11 30€104€) O©1-DEC-77 14:15 


<€1S><1Z>/CTHER FRPCRS / 
<€155¢€12>/PACK SERTAL SUMBER / 
1l. 
<15><12> 
7Cceu 1D=/ 
/OQVERLAY LOADER=/ 

#MAX TRANSFER SYZF ( MAK: / 


4 je 
/¥C. CF SCETWARKE CCMEARFS=/ 


/PKO6 BS &DD=/ 
/RKOG VEC ADD=/ 


/WOWEXISTFNT PEYOPY/<15><12> 


PAGE 213 


/PERDY TC BEGIN PERFCRMANCE TESTIFG/<15><€12><12> 


/STATISTIC INTERVAL=/ 


/PKO6 PPIOCK=/ 


/PAPMETERS FOP DRIVE / 


10/€15>€12><12> 


sec ¢€235 


43 











RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 


D7R6EPP.P11 


9765 
9766 
9767 
9768 
9769 
9770 
9771 
9772 
9773 
9774 
9775 
9776 
9777 
9778 
9779 
9780 
9781 
978? 
9783 
9784 
9785 
9786 
9787 
9768 
9789 
9790 
9791 
9792 
9793 
9794 
9795 
9796 
9797 
9798 
9799 
9800 
901 
9802 
9803 
9804 
9°05 
9806 
9807 
9808 
9809 
9810 
9811 
9912 
9913 
9°14 
9915 
9816 
9917 
981" 
9819 
9820 


056610 
056616 
056624 
056632 
056633 
056640 
056646 
056653 
056660 
056666 
056674 
056702 
056710 
056716 
056717 
056724 
056732 
056740 
056746 
056751 
056756 
056764 
056772 
057000 
057006 
057014 
057022 
057030 
057036 
057044 
057052 
057060 
057061 
057066 
057074 
057102 
057110 
057116 
057124 
057132 
057140 
057146 
057154 
057155 
057162 
057170 
057176 
057204 
057212 
057215 
057222 
057230 
057236 
057244 
057252 
057260 


11-AUG-76 


054503 
051105 
046454 

000 

124 
046440 
047111 


030054 
000075 


044514 
046440 
047111 


040522 
054101 
036440 
041505 
040515 
020116 
042101 
042524 
047511 


044522 
042510 
052106 
044522 

000 
051117 
041101 
040505 
047522 
042522 
020104 
047503 
040524 
042522 
051122 
051110 
042114 


042505 
047527 
042522 
020104 
044510 
051105 
047503 
044524 
042116 
054522 


042520 
047117 
052116 
051505 
033052 

000 
051117 
040522 
051122 
051110 
042114 
034464 


042116 
054101 
036440 


045503 
046454 

000 
047524 
026130 
000075 
053457 
051040 
036440 


042524 
045503 
051105 
042524 


042522 
042514 
020104 
020122 
044123 
000075 
05112? 
046102 
042101 
051117 
051505 
036440 


020113 
02012? 
044123 
000075 
044502 
04752? 
0*1122 
047117 
051040 
036440 


040522 
041440 
052040 
047510 
045465 


051504 
0*1516 
042105 
051505 
030452 
020113 


ASCII MESSAGES 


PAROO2: 


PAROO3: 


PAROOS: 


PAROOG: 


PAROOT: 


PAROO?s 


PAROO9: 


PARO10: 


PARO11: 


PARO123 


eASCIZ 


2 ASCIZ 


eASCIZ 


eASCI7Z 


2 ASCIZ 


e ASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


2 ASCI7 


eASCIZ 


MACY11 20(1046) O1-DEC-77 14315 PACE 214 


/CYLINDER MAX,MIN =/ 


/TRACK PAX,MIN =/ 


/SECTOR MAX, MIN =/ 


“READ/WPRITE RATIC =" 


/WRITE CHFCR AFTER WEITE =/ 


/COPRECTABLE FEAD EPROR THRESROLE =/ 


/UNCORRECTABLE READ EPROR THRESHOLD =/ 


/SEEK ERPOR THRESHOLC =/ 


/TNHIBIT FRROR CORRFCTION AND RFTRY =/ 


/OPERATICN COUNT THRESHOLN*ESF =/ 


WORDS TKAWSFERPED THRESHOLD*1,049K =/ 


SEG C236 


B3 








RF611/R2KO6 PERFORMANCE EXERCISER MAINDEC DZR6P-B 
DZR6P®.P11 


9921 
982? 
9823 
9824 
9825 
9826 
9R27 
9828 
982° 
930 
9831 
9832 
9833 
9834 
9835 
9836 
9837 
9838 
9839 
9840 
941 
984? 
9843 
9844 
9945 
9R46 
gr 47 
9848 
9849 
9850 
9851 
9852 
9953 
954 
9855 
9956 
9857 
gAsSR 
9859 
9860 
9R61 
986? 
9963 
9864 
9865 
9°66 
9°67 
9868 
9969 
9870 
9871 
9872 
9873 
9874 
9F75 
9876 


057262 
057270 
057276 
057277 
057304 
057305 
057312 
057314 
057322 
057330 
057336 
057344 
057350 
057256 
057357 
057364 
057372 
057400 
057406 
057414 
057422 
057426 
057434 
057442 
057450 
057456 
057464 
057472 
057500 
057506 
057513 
057520 
057526 
057534 
057536 
057544 
057551 
057554 
057562 
057570 
057576 
057601 
057606 
057614 
057622 
057630 
057636 
057644 
057646 
057654 
057662 
057670 
057675 
057702 
057710 
057716 


11-aUG-76 


054105 
042105 
020113 
020123 
040515 
047101 
051440 
047503 
052102 

123 
042105 
040520 
000075 
020040 
037477 

040 
02505? 
046101 
051117 
005012 

103 
046117 
046103 
044504 
020124 
020122 
600122 
047516 
047105 
044440 
651501 

126 
041505 
040504 
050131 


051522 
047503 


044510 
052517 


052106 
041530 
020104 
040440 
000075 
047101 


040516 
047524 
051105 
042516 
046515 
052504 
005015 
046103 
050040 
051101 
047101 
020130 
043123 
055111 
043116 
005015 
046501 
041440 
042522 


037477 
020040 
000040 


046103 
051105 


040440 
044524 
020116 
043117 
042516 
042524 
040524 
020105 


000124 
042116 


042122 
05212? 


000110 
052514 
040520 
042522 


042507 


046102 
043440 
052101 
020127 
047101 
020105 


042125 
041501 
040505 
020104 
051124 
0*1105 
020105 
044514 

000 
046120 
046517 
020123 


037477 
000 


052101 
051122 
006452 


051124 
020122 
020122 
047516 
040505 
647522 


052124 
047117 
045522 

000 
050130 
020104 
0£2040 
051105 


ASCII MFSSACES 


PARO13: .ASCIZ 
PaRO14: .ASCIZ 


PARO1S: .ASCIZ 
PARO16: .ASCIZ 


PAROI7: .ASCIZ 
PAROI®: .ASCIZ 


PARO19S .ASTIZ 
PARO20: .ASCIT 


eASCIZ 


PARO21: .ASCIZ 


QUESHK: .ASCIZ 


BLANKS: .ASCIZ 
ERROOO: .ASCIZ 


ERROO1: .ASCIZ 


ERROO2: .ASCIZ 


ERROO3: .ASCI7Z 


MACY11 20€1046) O1-DEC-77 14:15 PACE 215 


/PIPST/ 
/SECOND/ 


/THIRDS 
/POURTH/ 


/FIFTH/ 
/ EXCLUDED PACK AREA =/ 


/CHANGE/ 
/UMABLE TC CEMEPATE KEW CCHPARE CUE T0/<15><12> 


JEXCLUDED PACK AREAS AND “AX TRARSFER SIZE COMFLICT/<15><12> 


/SAMPLED CCWPAKES =/ 


4 2277772 «7 


4d 
/***FATAL ERRCR***/<1"9¢€12>¢€12> 


/CONTROLLER CLEAR OTC AOT CLEAR ERRCR/ 


/WO ATTFNTION IW RKASOF/ 


JUNEXPECTFD DATA TYPE ERRCR/ 


SEG 6237 


c3 








RK611/RKO6 PERFORMANCE EXERCISER MATWDEC DZR6P-B 
DZR6PB.P11 


9877 
9878 
9879 
9880 
9881 
988° 
9883 
9864 
9885 
9866 
9°87 
9868 
9889 
9890 
9891 
992 
9An93 
9F°94 
9R95 
9896 
9R97 
989R 
9#99 
9900 
9901 
990? 
9903 
9904 
9°05 
9906 
9907 
9908 
9909 
9910 
9911 
9912 
9913 
9914 
9915 
9916 
9917 
9918 
9919 
9920 
9921 
992? 
9923 
9924 
9925 
9926 
9927 
9928 
9929 
9930 
9931 
9932 


057724 
057730 
057736 
057744 
057752 
057760 
057766 
057774 
060002 
060010 
060016 
060023 
060030 
060036 
060044 
060051 
060056 
060064 
060072 
060100 
060106 
060112 
060120 
060126 
060134 
06014? 
060150 
060156 
060157 
060164 
060172 
060200 
060206 
060714 
060222 
060230 
060236 
060244 
060252 
060260 
06026? 
060770 
060276 
060304 
060312 
060320 
060326 
060332 
060340 
060746 
060354 
060362 
060370 
060371 
060376 
060404 


11-AaUG-76 


047522 
051104 
046103 
044504 
020124 
020124 
052116 
046111 
020114 
051105 
040515 

115 
046120 
053111 
042514 

123 
044527 
032061 
054503 
047117 
051117 

103 
046060 
051105 
044124 
046117 
042503 

000 

104 
040514 
0*1110 
042114 
042505 
042101 
020123 
020040 
020104 
042523 
020040 
005015 
020040 
020040 
020040 
040524 
047520 
020040 
006443 
047503 
046114 
051122 
052117 
043507 

000 

127 
047503 
047516 


000122 
053111 
04¢505 
020104 
042522 
052101 
047511 
042514 
051104 
041440 
042116 
046125 
020105 
020105 
052103 
052105 
041524 
052040 
046103 
042440 
005015 
047117 
042514 
047522 
042522 
020104 
042105 


052101 
042524 
051505 
042440 
042504 
051104 
047507 
020040 
020040 
052103 
040504 


020040 
040504 
020040 
020040 
020123 
040520 
000012 
052116 
051105 
051117 
043040 
042105 


051117 
047125 
020124 


020105 
020122 
047516 
042523 
042524 
000116 
640507 
053111 
046517 

000 
044524 
051104 
042523 

000 
051440 
020110 
020117 
020105 
051122 

000 
051124 
020122 
020122 
044123 
054105 
042105 


020101 
052040 
047510 
041530 
000104 
051505 
042117 
040502 
020040 
051117 
040524 


020040 
040524 
040504 
020040 
020040 
020124 


047522 
042440 
047040 
040514 
005015 


020104 
620124 
050505 


ASCII PESSACES 


ERROO4: .ASCIZ 


EPROOS: .ASCIZ 


EPROOG: .ASCIZ 


EPROO7: .&SCIZ 


ERROOPs .ASCIZ 


ERROO®: .ASCIZ 


EPRO12?: .ASCIT 


eASCIZ 


ERRO13: .ASCI7 


ERRO14: .ASCIZ 


MACY11 30(1046) O©1-CEC-77 14:15 PACE 216 


/ORTIVE CLEAR DID MCT RESET AITERTION/ 


JILLECAL DRIVER COMMAND/ 


/MULTIPLE DRIVE SELECT/ 


/SET SWITCH 14 TO CYCLE OW ERPCR/<15><12> 


/CONTPOLLER ERROR THRESRCLO EXCEETEC/ 


/DATA LATE THRESHOLD EXCEEDFEL/ 


/ADDRESS COOD BAD SECTCR fCATA/<15><12> 


4 DATA DATA POS 


PAT #/<€15><172> 


/CONTROLLER EPRCR WOT FI AGGFL/<15><12> 


/UGRD COUNT NWCT EQUAL 0/<15><12> 


D3 


































































9933 
9934 
9935 
9936 
9937 
9938 
9939 
9940 
9941 
9942 
9943 
9944 
9945 
9946 
9947 
9948 
9949 
9950 
9951 
9952 
9953 
9954 
9955 
9956 
9957 
9958 
9959 
9960 
9961 
996? 
9963 
9964 
9965 
9966 
9967 
9968 
9969 
9970 
9971 
9972 
9°73 
9974 
9975 
9976 
9977 
9978 
9979 
9980 
9981 
998? 
9983 
9984 
99865 
9°86 
9987 
9988 


DZR6PR.P11 


060412 
060420 
060422 
060430 
060436 
060444 
060446 
060454 
060462 
060470 
060476 
060504 
060512 
060520 
060526 
060532 
060540 
060545 
060552 
060560 
060564 
060565 
060572 
060600 
060606 
060614 
060622 
060630 
060631 
060632 
060640 
060646 
060650 
060651 
060656 
060664 
060665 
060672 
060700 
060704 
060712 
060720 
060726 
060734 
060742 
060744 
060752 
060760 
060763 
060770 
060776 
061004 
061012 
061020 
061023 
061030 


11-AUG-76 


040525 
000012 
052502 
020104 
051122 
000012 
054503 
026113 
047111 
041505 
047503 
046114 
046517 
052040 
052517 
051120 
051122 

111 
04712* 
042117 

106 

105 
053440 
053440 
043516 
04252? 
042440 

000 

10€ 
047516 
051511 
000126 

106 

12? 
020116 

106 

125 
044506 
051105 
005015 
051106 
053122 
052440 
052040 
000012 
040510 
0£*3122 
005015 

104 
040524 
044103 
042040 
052117 
005015 

125 
041505 


00:00 
020114 


020123 
047111 
041505 


026114 
042523 
047503 
006524 
052116 
051105 
040515 
046511 
000124 
043517 
051117 
046114 
052103 
000105 


051122 
044510 
044501 
052040 
047520 
051122 


026516 
020124 


051105 
040520 


044516 
046105 
000122 
047111 
046517 
047040 
042116 
051505 


042122 
042440 

000 
053122 
052524 
047101 
042111 
041440 

000 
042516 
020124 


006460 


042101 
047503 
006524 


051124 
020103 
051122 
000017 
047522 
041440 
042116 
020105 


042440 

000 
043040 
041440 


051117 
042514 
044524 
020117 
05212? 
051117 


054105 
051104 


04750? 
000122 


020124 
020104 


020124 
042040 
052117 
051105 
006524 


042040 
0£1122 


051440 
020122 
042507 
047040 
051114 


050130 
052101 


RE611/RKO6 PERFORMAWCE EXERCISER MAINDEC DZR6P-B8 


ASCII MESSAGES 


EPROIS: 


ERRO16: 


ERRO173 


ERRO20: 
ERRO213 


ERRO22: 


ERRO233 


ERRO24: 


EPRO25: 


ERRO263 


ERRO273 


ERRO28: 


ERRO30: 


eASCIZ 


eASCIZ 


eASCIZ 


2 ASCIZ 
eASCIZ 


BYTE 
eASCIZ 


BYTE 
eASCIZ 


BYTE 
eASCIZ 
oBYTE 
eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


MACY11 20(1046) O©1-DEC-77 14315 PACE 217 


/BUS ADD THCORRECT/<15><12> 


/CYL,TRE,ZSEC TBCORRECT/<15><12> 


/CONTROLLER COMPAND TIME CUT/ 


/PROG ERRCR/ 
JILL FPURCT CODE/ 


106 
JERROP WHILE WAITING TC REPORT ERRCR/ 


106 
/ROR-EXIST ORV/ 


106 

/SEPCCN PAR/ 

106 

/UNIT FIELD ERR/ 


<€15><€12>/3NT FROM DPY WOT UNDER TEST/<15><12> 


/HARD DRY ERR/<15><12> 


/ORV STATUS CHANGE DID NOT CLR/<1£><12> 


JUREXPECT ATTR/<159<17> 








RF611/RK06 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PR.PI1 


9989 

9990 

9991 

9992 

9993 

9994 

9995 

9996 

9997 

9998 

9999 
10000 
10001 
1000? 
10003 
10004 
10005 
10006 
10007 
10008 
10009 
10010 
10011 
10012 
10013 
10014 
10015 
10016 
10017 
10018 
10019 
10020 
10021 
10022 
10023 
10024 
10025 
10026 
10027 
10028 
10029 
10030 
10031 
10032 
10033 
10034 
10035 
10036 
10037 
10038 
10039 
10040 
10041 
10042 
10043 
10044 


061036 
0610423 
061050 
061056 
061057 
061064 
061072 
061074 
061102 
061103 
061110 
061116 
061124 
06113? 
061133 
061140 
061146 
061154 
061162 
061170 
061172 
061177 
061200 
061206 
061207 
061210 
061216 
061224 
061225 
061232 
061234 
061235 
061242 
061250 
061253 
061254 
061262 
061270 
061276 
061304 
061306 
061314 
061321 
061322 
061330 
061336 
061341 
061346 
061354 
061355 
061356 
061364 
061367 
061370 
061376 
061404 


11-aUG-76 
047124 


051511 
020126 
000124 
106 
123 
047111 
000 
106 
051104 
020106 
106 
115 
000122 
126 
117 
020124 
050115 
127 
042110 
020103 
047516 
051511 
000115 
047125 
050040 
117 
051104 
044515 
051122 
104 
040514 
000 
117 
040504 
045510 
107 
051127 
044102 
000122 


005015 
046114 
040440 


052122 
020113 


046040 


042520 
051517 
020126 
042440 


051117 
051105 
026516 
020124 
052506 


042505 
047503 


020126 
051124 


051511 


042520 
047111 
000 


020122 
051105 
076516 
020124 


041111 
051101 


020126 
043516 

000 
052101 
042524 


040524 
000 


052111 
020113 


000 
042040 
042104 


046040 
051105 


053517 


042105 
000123 
054524 
051122 


04015 
000122 
054105 
051104 
041516 


020113 
0£0115 


043117 
000113 
047520 


040522 
047503 


051126 
000122 
054105 
042515 


051525 
000 


044524 
042440 


020101 
005015 
041440 


020105 
0£1105 


ASCII MFSSACES 


EPRO313 


ERRO32: 


EPRO33: 
ERRO34: 
ERRO3S: 


ERRO37: 


ERRO42: 


ERRO433 


ERRO443 


ERRO4S: 


ERRO46:3 


EPRO473 


ERRO493 


ERROSO: 


eASCIZ 


eASCIZ 


e ASCIZ 
e ASCIZ 
2 ASCIZ 


eASCIZ 
eASCIZ 


oPRYTE 
eASCIZ 


BYTE 
eASCIZ 


BYTE 
eASCIZ 


eRYTE 
2 ASCIZ 
ePYTE 
2 ASCIZ 


eASCIZ 


eASCIZ 
ePRYTE 
2 ASCI7. 
eASCIZ 
eo BYTE 
eASCIZ 


BYTE 
eASCIZ 


MACY11 30€1046) O01-0FC-77 14315 PACE 216 


JILL OS ADD/ 


/URT LOCK ERR/ 


/ac LCw/ 
/SPEED LOSS/ 
/ORV TYPE ERR/ 


/PORMAT EFR/ 
/HON-EXIST ORV FURCT/ 


10€ 
/SEEK IMCCHP/ 


106 
/ORV OFF TRK/ 


106 
/¥ISPOS/ 


126 

/OPERAT INCOMP/ 
127 

/ADP WRC ERP/ 


JWON-EXIST MEWS 


/UNIBUS PAK/ 

117 

/ORV TIMING EFR/ 
/DATA LATE/<1£><12> 
117 

/DATA CHK/ 


107 
/URITE CHR ERR/ 


Sec €24¢ 


F3 





RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PB.P11 


10045 
10046 
10047 
10048 
10049 
10050 
10051 
10052 
10053 
10054 
10055 
10056 
10057 
10058 
10059 
10060 
10061 
1006? 
10063 
10064 
10065 
10066 
10067 
10068 
10069 
10070 
10071 
10072 
10073 
10074 
10075 
10076 
10077 
10078 
10079 
10080 
10081 
1008? 
10083 
10084 
10085 
10086 
10087 
10068 
10089 
10090 
10091 
10092 
10093 
10094 
10095 
10096 
10097 
10098 
10099 
10100 





061406 
061414 
061422 
061426 
061427 
061434 
061442 
061450 
061456 
061464 
061472 
061500 
061504 
061505 
061512 
061520 
061526 
061534 
061542 
061545 
061546 
061554 
061562 
061570 
061576 
061604 
061612 
061613 
061620 
061626 
061634 
061642 
061650 
061656 
061664 
061667 
061674 
06170? 
061710 
061716 
061724 
061732 
061740 
061744 
061752 
061760 
061766 
061774 
062002 
062010 
062015 
062022 
062030 
062036 
062041 
062046 


11-AUG-76 00:00 


054503 
051104 


042523 
041040 
042510 
05212? 

105 
051511 
041505 
005015 

104 
047503 


020114 
047440 
000127 


047115 
042515 
042040 
020107 
044524 
020107 
052101 
000012 


053122 
051040 
052106 
040524 
044520 

000 


020114 
020104 
047516 
020124 
020122 
040440 


053122 
043101 
0201 26 
047516 
044504 
020104 
052501 

000 
053122 
020116 
047516 
052114 
051104 
052101 
040510 
000012 
042116 
020105 
051104 
055111 
020131 
020122 
005015 
041503 
047503 
044524 

000 
052101 
050115 


042101 
051126 


020104 
047440 
051125 
047520 
047117 
050117 
047511 


047040 
054504 
051105 
052122 
042116 


040526 
044504 
020124 
043101 
040520 
045503 


052440 
000105 
051105 
020124 
040503 
054502 
052114 


040440 
052502 
043040 
047440 
020126 
051525 
043516 


052040 
052517 
020126 
042105 
052117 
047520 

000 
046440 
051122 
047117 


020101 
051101 


ASCII MESSAGES 


EPROS2: 


ERROS3: 


ERROS4: 


ERROS6: 
ERROS7: 


ERRO6?: 


2 ASCI7Z 


BYTE 
eASCIZ 


BYTE 
eASCIZ 


BYTE 
eASCIZ 


·Asc17 
eASCIZ 


eASCIZ 


eASCI7 


eASCIZ. 


eASCI7. 


MACY11 30(1046) O1-DEC-77 142315 PACE 219 


/CYL ADDR OVRFLW/ 


106 
/CMND TIME OUT DURING POSITIONING OPERATION/<15><12> 


106 
/ORV ROT POY AFTER START SPINDLE/ 


106 
/VOL VALID DID WOT SET AFTER PACK ACK/ 


/ORV UNSAFE/ 
/ORVY ERR ROT THDICATED PY FAULT/<15><12> 


/ORV ATTN BUT WC FAULT OR DRY STATUS CHANCE/<15><12> 


/CMND TIME OUT ORV SEIZED BY CTHEF POPT/<15><12> 


/FCC WISCCRRECTICW/<15><12> 


/DATA COMPARE ERRCR/<15><12> 


Sec C241 


C3 





RE6LI/RKOG PERFORMANCE EXERCISER MAINDEC OZROP-8 


OZR6PB.P11 


10101 
1010? 
10103 
10104 
10105 
10106 
10107 
10108 
10109 
10110 
10111 
10112 
10113 
10114 
10115 
10116 
10117 
10118 
10119 
10120 
10121 
10122 
10123 
10124 
10125 
10126 
10127 
10128 
10129 
10130 
10131 
10132 
10133 
10134 
10135 
10136 
10137 
10138 
10139 
10140 
10141 
10142 
10143 
10144 
10145 
10146 
10147 
10148 
10149 
10150 
10151 
10152 
10153 
10154 
10155 
10156 


062054 
06206? 
06 2066 
062067 
062074 
062076 
062077 
062104 
062112 
062120 
062121 
062126 
062134 
062141 
062146 
062154 
062162 
062170 
062176 
062204 
062205 
06271? 
062220 
062226 
062231 
062236 
062244 
062252 
062260 
062266 
062774 
062277 
062300 
062206 
062314 
062322 
062330 
062236 
062342 
062350 
062356 
062364 
062372 
062400 
062406 
062414 
062422 
062430 
062436 
062444 
062452 
062453 
062460 
062466 
062474 
062502 


11-AUG-76 00:00 


020105 
00652? 
126 
115 
000123 
106 
110 
042523 
042440 
000 
10* 
043517 
051122 
122 
020124 
050103 
047527 
052517 
053116 


020040 
020040 


051105 
000012 


051511 


040505 
042514 
051122 


041503 
041511 
051117 
042513 
051040 
006523 
042122 
052116 
046101 


051525 
042522 
053116 

000 
046131 
020122 
044514 
041501 
052193 
053116 

000 


047522 
042040 
042111 
051040 
020104 
000123 
051122 


_ 052523 


042105 
042116 
054503 
020040 
020040 
020103 
043117 
020040 
042101 
020104 


042522 
020123 
042116 
054503 
020040 


047522 


047520 


020104 
052103 
051117 


046040 
042440 

000 
0501023 
042513 
000012 
041440 
044440 
042111 


040440 
0515223 
046101 


047111 
047111 
000104 
027513 
051117 
046101 


020122 
053122 
047040 
046105 
042510 


047105 
050120 
005015 
020040 
020114 
051124 
020040 
020040 
0*1506 
052502 
020040 
052103 


044526 
005015 
020040 
020114 
051124 


ASCII MESSAGES 


ERROG4: 


ERRO6S3 


EPRO673 


ERRO70: 


ERRO71: 


ERROT2: 


ERRO73: 


EPRO74: 


EPR100: 


ERR1013 


eoPYTE 
2 ASCIZ 


BYTE 
eASCIZ 


eASCIZ 


eASCIZ 


eo ASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


BYTE 
eASCIZ 


eASCIT 


eASCIZ 


eASCIT 
eASCIZ 


MACY11 30€1046) 0O1-DEC-77 


126 
/*ISPOS/ 


106 


/HEAD SELECT ERROP/ 


JECC LOCIC ERPCR/ 


JPRECPT PRECPS/<15><12> 


/WORD COURT INVALID/ 


/BUS ADDRESS INVALID/ 


/CYLINDER INVALID/ 


“TRACK/SECTOR INVALIC® 


106 


14315 PACE 220 


ZERROR IN DRV DID NOT RFLOAC HEACS/ 


/CURRENT SUPPLIED/<1£><12> 


CHRD 


cYL 


TRF 


/PREVIOUS /<15>¢€12> 


/CHND 


cYL 


TRE 


SEC 


SEC 


CFFSET BUS 


wRO CT/ 


AD bad CT/ 


sec C243 


AS 


RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 


OZR6PS.P11 


10157 
101586 
10159 
10160 
10161 
10162 
10163 
10164 
10165 
10166 
10167 
10168 
10169 
10170 
10171 
10172 
10173 
10174 
10175 
10176 
10177 
10178 
10179 
10160 
10181 
1018? 
10183 
10184 
10185 
10186 
10187 
10188 
10189 
10190 
10191 
10192 
10193 
10194 
10195 
10196 
10197 
10198 
10199 
10200 
10201 
10202 
10203 
10204 
10205 
10206 
10207 
10208 
10209 
10710 
10211 
10212 


062510 
062516 
062524 
062532 
062535 
062542 
062543 
062550 
062554 
062562 
062570 
062576 
062602 
062610 
062616 
062624 
062632 
062640 
062642 
062650 
062656 
062664 
06267? 
062700 
062706 
062712 
062720 
062726 
062734 
06274? 
062750 
062756 
062764 
062772 
063000 
063003 
063010 
063016 
063024 
063032 
063040 
063046 
063054 
063062 
063070 
063073 
063100 
063106 
063114 
063122 
063127 
063134 
063142 
063150 
063156 
063164 


11-AUG-76 00:00 


054522 
051505 
005015 

105 
051040 
051105 
052523 
052506 
051105 
044124 
046117 
042503 
005015 

121 
047511 
020105 
020105 
051525 

103 
046117 
044524 
0352517 
044124 
042523 


050040 


043106 
000075 
020061 
042110 
020040 
000012 
040524 
020105 
052440 
044504 
040505 


052116 
051105 
051117 
047111 
053111 
053122 
000107 
047522 
044522 
051122 
041505 
006531 
047522 
047503 
051440 
043123 

000 
051122 
041505 
020131 
042503 
006514 
047522 
042522 
020104 
042105 

000 
042525 
040*16 
051104 
052123 
005015 
047117 
042514 
042515 
020124 
043440 
006524 


ta 


020040 
020040 
020104 


052101 
642523 


020040 
020062 
042110 


046040 
044127 
046116 
043516 
042504 


047522 
042440 
042040 
020107 
020105 
041511 


02012? 
043516 
051117 
053117 
000012 
020122 
042526 
041525 
046125 


051117 
053117 
047125 
051523 
000012 
020122 
044123 
054105 
042105 


052122 
046102 
053111 
052101 

000 
051124 
020122 
020104 
044527 
020117 
000012 


ASCII MFSSACES 


ERR102: 
ERR108: 
ERRI11: 


ERR200 : 


ERR201: 


EPR2023 


ERR203: 


ERR204: 


ERR205: 


ERR2063 


ERR2073 


eASCIZ 
eASCIZ 
eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


MACY11 30€1046) O1-DEC-77 14315 PACE 271 


4 Pats 
/OFPSET =/ 


/fid1 "D2 #D3/<15><12> 


/DATA LATE WHEN UNLOADING HEADER/ 


/CORTROLLER ERECKH CURTHG DRIVE SEFVICTNG/ 


JERPOPR DURING ERROR RECOVERY/<1*><12> 


/EGROW PECCVERY SUCESSFUL /<15><12> 


JERROP PECOVERY UNSUCESSFUL/<15><12> 


/ERROR THRESHOLD EXCEEDFD/<15><12> 


/QUESTIONABLE DRIVE STATUS/<15><12> 


/COWTROLLFR TIMED CUT BITH CC SFI/<15><12> 





RF611/RKO6 PERFORMANCE EXERCISER MATNDEC DZRG6P-f 


OZR6P8.P1i1 


10213 
10714 
10215 
10216 
10217 
10718 
10219 
10220 
10221 
1022? 
10223 
10224 
10225 
10726 
10227 
10228 
10229 
10230 
10231 
10232 
10233 
10234 
10235 
10236 
10237 
10238 
10239 
10240 
10241 
10242 
10243 
10244 
10245 
10246 
10247 
10248 
10249 
10250 
10251 
10252 
10253 
10254 
10255 
10256 
10257 
10258 
10259 
10260 
10261 
10262 
10263 
10264 
10265 
10266 
10267 
10268 


063172 
063200 
063206 
063214 
063222 
063223 
063224 
063232 
063240 
063243 
063250 
063256 
063264 
06327? 
063274 
063302 
063303 
063310 
063312 
063320 
063326 
063334 
063342 
063350 
063356 
063763 
063370 
063376 
063401 
063406 
063414 
063422 
063430 
063436 
063444 
063452 
063460 
063466 
063474 
063500 
063506 
063514 
063522 
063530 
063536 
063544 
063552 
063560 
063566 
063567 
063574 
063602 
063610 
063616 
063624 
063630 


11-AUG-76 00:00 


051105 


047522 
046111 
043501 
043516 


042101 
051122 

000 
0275052 
020124 
020122 
025052 


047520 
050113 
051104 


043117 
047111 


047440 


052103 
020116 
020122 
042012 
042522 

000 
041513 
051040 
020040 
051103 
041113 
051040 
020040 
020103 
040513 
051040 
000012 
051504 
045522 
020040 
020062 
051115 
045522 
020040 
006524 
051504 


046412 
020040 
020101 
020040 
030060 
000040 
030040 


020122 
020105 
047516 
005015 


051105 
051117 


044506 
051106 
047111 
006452 


020123 
052101 


051505 
041040 
044516 
020106 
051117 
051105 

000 
052101 
042101 


030523 
04151? 
05104 
020040 
020101 
0421123 
051040 
020040 
047523 
042513 


020040 
051115 
045527 
020040 
020063 
047520 
045522 
600012 
005015 


051505 
020040 
020040 
006502 
020040 


020061 


ASCII MESSACES 


ERR2083 


ERR209% 


ERR2103 


ERR2113 
ERR212: 
ERR2133 


ERR214: 


EPR301: 


ERR302: 
ERR3023 


EPR304: 


2 ASCIZ 


BYTE 
eASCIZ 


eASCIZ 


eASCIZ 
eASCIZ 
eASCIZ 


eASCIZ 


eASCIZ 


eASCI7 


eASCIZ 
eASCIZ 


eASCIZ 


MACY11 30(1046) O1-CEC-77 14315 PAGE 222 
Sec 0244 


JERROR WHILE DIAGHOSING/<15><12> 


127 
JHEADER ERGBOR/<159<12> 


/***FTRST ERROR IWFO***/<15><172> 


⸗nxpOos / 
/PKPAT / 
JADDRESS CF BECTSRING CF SECTCE IB FRRCE / 


<€15>€12>/DATA READ/<15><12> 


/RKCS1 PKCS2 PKWCR RKPA PKCA RKODC BKASCE fKER/<15><13> 


/PKDS RKMR1 PRYR2 OKYES PKFOS PKPAT/<1£><12> 


/RPKDS/<15><12> 


<€15>¢€12>/MESS A B/<15><12>/ 00 , 


<€15><€12>/ 01 i 


o3 








_®. @ 


RK611/RKOG PERFORMANCE EXERCISER MAINDEC DZR6P-B MACY11 30€1046) O1-CEC-77 14315 PACE 223 
OZR6PB.P11 11-A0G-76 00:00 ASCII MESSAGES SEC 0245 
10269 063636 020040 020040 000 
10270 063643 015 020012 030061 ERR30S: .ASCIZ <15><12>/ 10 / 
10271 063650 020040 020040 000040 
10272 063656 005015 030440 020061 ERR306: .ASCIZ <15><12>/ 11 / 
10273 063664 020040 020040 000 
10274 063671 125 042516 050130 ERR400: .ASCIZ /UNEXPECTED WENORY PARITY TRAP/ 


10275 063676 041505 042524 020104 

10276 063704 042515 047515 054522 

10277 063712 050040 051101 052111 

10278 063720 020131 051124 050101 

10279 063726 000 

10280 063727 124 046511 035105 fTIMO0O: .ASCIIT /TIMES/ 

10281 063734 020040 035040 020040 TIMO001: .ASCIZ / & 2 /€15><€17> 
10282 063747? 020072 006440 000012 

10283 EVEN 


K3 





— 


RK611/RKO6 .—ORMMnCk EXERCISER MAINDEC DZR6P-8 
11-AUG-76 00:00 


DZR6PB.P11 


10264 
10285 
10266 
10287 
107868 
10289 
10290 
10291 
10292 
10293 
10294 
10295 
10296 
10297 
10298 
10299 
10300 
10301 
10302 
103023 
10304 
10305 
10306 
10307 
10308 
10309 
10310 
10311 
10312 
10313 
10314 
10315 
10316 
10317 
10318 
10319 
10320 
10321 
10322 
10323 
10324 
10325 
10326 
10327 
10328 
10329 
10330 
10331 
10332 
10333 
10334 
10335 
10336 
10337 
10338 
10339 


063750 
964050 


064052 
064060 
064064 
064070 
064072 
064074 
064076 
064100 
064102 
064104 
064110 
064114 
064120 
064122 
064124 
064130 
064134 
064140 
064142 
064146 
064152 
064156 
064162 
064164 
064170 
064174 
064200 
064204 
064206 
064212 
064216 
064222 
064226 
064230 
064234 
064240 
064244 
064250 
064252 
06 4256 
064262 
064266 
064272 
064274 
064300 
064304 
064310 
064314 
064320 
064322 


000040 
000000 


012737 
010637 
012706 
010546 
010446 
010346 
010246 
010146 
010046 
013705 
004737 
004037 
064630 
011646 
004737 
004737 
004037 
064643 
016646 
004737 
004737 
004037 
064656 
016646 
004737 
004737 
004037 
064671 
016646 
004737 
004737 
004037 
064704 
016646 
004737 
004737 
004037 
064717 
016646 
004737 
004737 
004037 
064732 
013746 
004737 
004737 
004737 
004037 
064745 
004737 


000340 177776 
064050 
064050 


000224 
064442 
064522 


064546 
064442 
064522 


000002 
064546 
064442 
064522 


000004 
064546 
064442 
064522 


000006 
064546 
064442 
064522 


000010 
064546 
064442 
064522 


000012 
064546 
064442 
064522 


064050 
064546 
064442 
064442 
064522 


064442 





-S8TTL 
EVEN 

oo STCKs 
2 DUMP: 


BLK 
WORD 


#-oSTCK, SP 
RS,-( SP) 
R4,-C(SP) 
R3,-CSP) 
R2,-(SP) 
R1,-( SP) 
RO,-(SP) 
ooLOU,R5 
PC, oe CR 
RO,-.-ASCI 


(SP),-(SP) 
PC,--0CT 
PC, --CR 
RO, --ASCI 


2(SP),-( SP) 
PC, --0CT 
PCy oeCR 
RO, -ASCI 


4(SP),-(SP) 
PC,.-0CT 
PC, --CR 

80, --ASCI 


6(SP ),-(SP) 
PC,-.0CT 
PC, 2eCR 
RO,--ASCI 


10¢(SP),-(SP) 


PC,--0CT 
PC, CR 
RO,~--ASCI 


12¢SP),-( SP) 
PC, --0CT 

PCy eeCR 
RO,--ASCI 
eeSTCK,-( SP) 
PC,.-0CT 

RO, --ASCI 


PC, --CR 


macvil 30€1046) Oi-CEC-77 14315 PAGE 224 


JRESERVE SPACE FOR STACK 
SSTORED STACK PCIBTER 


sLOCK OUT ALL IBTERRUPTS 
dSTORE STACK POISTER 
sLOAD STACK POINTER 
37PUSH PS OW STACK 
33PUSR R4 OB STACK 
33PUSH R32 ON STACK 
d3PUSH R2 OW STACK 
33PUSH R1 OF STACK 
33P0SH RO OW STACK 
sSTORE FIRST ADDRESS 
STYPE <CR><LF> 

sTYPE RO = 


sTYPE #1 = 


sTYPE R&R? = 


sTYPE 


sTYPE R4 = 


STYPE RS = 


gTYPE SP = 


sTYPE HEADER 


43 


a. -@ -@ .@ 


A @& @ @ 





RK611/R2KO6 PERFORMANCE FXERCISER MAINDEC DZR6P-B 
11-AUG-76 00:00 


OzR6PR.P11 
10340 064326 


10341 
10342 064332 
10343 064334 
10344 064340 
10345 064344 
10346 064350 
10347 064352 
10348 064354 
10349 064360 
10350 064362 
10351 064364 
10352 064370 
10353 064374 
10354 064376 
10355 064400 
10356 064404 
10357 064406 
10358 064412 
10359 064416 
10360 064420 
10361 064422 
1036? 064424 
10363 064426 
10364 064430 
10365 064432 
10366 064436 
064440 


10367 
10368 
103769 064442 
10370 064446 
10371 064450 
10372 064456 
10373 06446? 
10374 064464 
10375 064472 
10376 064476 
10377 064500 
10378 064504 
10379 064506 
10380 064514 
064516 
064520 


10381 
064522 


10382 

10383 

10384 

10385 

10386 064524 

10387 064526 
064530 
064534 
064536 
064542 


10368 
064544 


10389 
10390 
064546 


10391 
10392 
10393 
10394 
10395 





004737 


010546 
004737 
012703 
004037 
064770 
012546 
004737 
005303 
001370 
004737 
005777 
100001 
000000 
023705 
103352 
004737 
004737 
012600 
012601 
012602 
012603 
012604 
012605 
013706 
000000 
000776 


105777 
100275 
112777 
105777 
100375 
112777 
113701 
001410 
105777 
10037£ 
113777 
005301 
001370 
000207 


012001 


105711 
001406 
105777 
100375 
112177 
000770 


000200 
012701 


064546 
000004 
064522 


064546 


064442 
114544 
000226 


064442 
064442 


06 4050 


114502 


000015 
114466 


000012 
001155 


114444 
001154 


114414 
114410 


114474 


114460 


114436 


10$: 


1252 


oo CRs 


S$: 


10$: 


20$% 
ee ASCI: 
1$: 
2$3 


20$: 
2eOCT? 


JSR 


RTS 
nov 


macvil 30(1046) O1-DEC-77 14315 PACE 225 


PC, 2 CR 


R5,-(SP) 
PC, --0CT 
44,83 

RO,--ASCI 


(RS )4,-(SP) 
PC,..0CT 


ooHIGH,RS 
10$ 

PC, ooCR 
PC, .-CR 
(SP )¢,R0 
CSP)eo,81 
(SP) e,R2 
(SP )¢,R? 
aSP)e,R4 
(SP)o,R5 
eoSTCK,SP 


222 

esTPs 
€15,eSTPS 
esTPs 

5$ 
#12,eSTPe 
S$PILLS,R1 
20$ 

esTPs 

10$ 
SNULL, @S TPB 
R1 


10$ 
ec 


(RO Do,k1 


2 
(R1)¢,@STFB 
1$ 


RO 
06,F1 





see 0247 
sTYPE ADDRESS 
STYPE 4 LOCATICHS PER Lise 


STYPE COBTE*TS 
SCHECE TF STAPT GF BEXT LIBE 


sCHECR Tf STCP PEIAT CUT 


SCHECK Tf FIBISREC 


33POF 
33P0F 
33P0P 
39PO0P 


STACK 
STack 
STACK 
STack I8T0 
33P0P STACK IPTC 
33P0P STACK INTO 
SRESTCRE STACK PCTIBTEP 


isto 
1n7C 
into 


SWAIT FOR READY 


sLOaD <CR> 
SUATT FOR READY 


sLGAL <LeF> 

sLOAC FILL COUsT 
sRETURN IF BO FILLS 
SWVATT FOR READY 


SLOAC FILL CHARACTER 
sCHECK IF FILL COMPLETE 


;PETUPBS 

sSTOKF ADDRESS OF ASCII 
sCHPCR TP FIRISHEC 
SVATT FOR READY 

sTYPE CRARACTFE 


sRETURD 
sLOAD DIGIT CCUNT INTO F1 


x 
tos 





/ 


a 2 2 2 2 & 2.82 A A A A A. 2 A A Aa A A.A A.M 


RFO11/RX06 PERFORMANCE EXERCISER PAINDEC DZRE6P-F 
11-AUG-76 00:09 


DZR6EPR.P11 


10396 064552 
10397 064554 
10398 
10399 064556 
10400 064560 
10401 064564 
10402 064566 
10403 06457? 
10404 064574 
10405 064600 
10406 064602 
10407 064606 
10408 064612 
10409 064614 
10410 064620 
10411 064622 
10412 064624 
10413 064626 
10414 
10415 064630 
10416 064636 
10417 064642 
10418 064650 
10419 064656 
10420 064664 
10421 064671 
1042? 064676 
10423 064704 
10424 064712 
10425 064717 
10426 064724 
10427 064732 
10428 064740 
10429 064745 
10430 064752 
10431 064760 
10432 064766 
10432 064770 
10434 
10435 
10436 
10437 064776 
10438 065004 
10439 065012 
10440 065020 
10441 065026 
10442 065034 
10443 065042 
10444 065050 
10445 065056 
10446 065064 
10447 065071 
@E 10448 065076 
10449 065104 
10450 065112 
10451 065120 


005002 
000407 


005002 
006366 
006102 
006366 
006102 
006366 
00610? 
052702 
105777 
100375 
110277 
005301 
601355 
012616 
000207 


030122 
020040 

122 
020040 
031122 
020040 

122 
020040 
032122 
020040 

122 
020040 
050123 
020040 

101 
051523 
047117 
000123 
020040 
064776 
064776 
065202 
044124 
033060 
051525 
050040 
046122 
046522 
031040 
052103 
042520 
041501 

124 
044507 
043122 
041516 
052123 


000002 
000002 
000002 


000060 
114336 


114332 


036440 
020040 
020001 
020040 
036440 
020040 
070063 
020040 
036440 
020040 
020065 
020040 
036440 
020040 
042104 
020040 
042524 


020040 


020105 
045455 
020124 
047522 
020131 
052101 
020062 
051117 
020122 
006513 
020117 
020116 
051117 
020105 
047111 


020040 

060 
020075 
000040 
020040 

000 
020075 
000040 
020040 

000 
020075 
000040 
020040 

000 
04252? 
041440 
052116 


045522 
046440 
042502 
042520 
047506 
042105 
042523 
020122 
051124 

012 
042502 
042520 
040515 
042524 
020107 


eee DUMP MEPORY 


CLR 
BR 


eeROS eASCIZ 
oeR1S eASCIZ 
2eR23 eASCIZ 
oeR33 2 ASCIZ 
oo R43 eASCI7 
2eRSS eASCIZ 
eeSPs 2 ASCIZ 
ecADD? -ASCIZ 


oeBLWK: .ASCIZ 
eo EVEN 

HDBUFF=. 
BUFADD=.¢137. 
HELP: eASCIT 


eASCIT 


MACY11 20€1046) O1-CEC-77 14215 PAGE 226 


R?, @STPB 
Ri 

5$ 
CSP )e, (SP) 
PC 

/P0 = 

7R1 = 

7R2 = 

/P3 = 

/P4 = 

“RS = 

/se = 


/ADDRESS 


/THE PKOG-K MUST BE FRCPERLY FCRPATED 22 SECTCRS FER THRACR/<1*><17> 


/TC BSFGTN PFRFGRMANCE TESTING TYFF CONTROL-C <°C>/<15><12> 


sCLEAR P2 FOk CUTPUT 
sCET LEAOTNE DICIT 


sGe? OCTAL DICIT 


sMARE IT ASCIT 
sWATT FOR READY 


sTYPE OCTAL DIGIT 
sCHFCK TF BRCLE BCKF PRIATES 


ZADJUST RETURN 


sRETORW 
/ 
/ 
/ 
/ 
/ 
/ 
/ 
CONTENTS/ 


tec C246 


AY 











lavove oe’ eter eter e eee oe eter ee es 


RK611/RFO6 PERFORWAWCE EXERCISER MATWDEC DZR6P-P 


DZR6PB.P11 


1045? 
10453 
10454 
10455 
10456 
10457 
10458 
10459 
10460 
10461 
10462 
10463 
10464 
10465 
10466 
10467 
10468 
10469 
10470 
10471 
10472 
10473 
10474 
10475 
10476 
10477 
10478 
10479 
10480 
10481 
10482 
10483 
10484 
10485 
10486 
10487 
10488 
10489 
10490 
10491 
10492 
10493 
10494 
10495 
10496 
10497 
10498 
10499 
10500 
10501 
10502 
10503 
10504 
10505 
10506 
10507 


065126 
065134 
065142 
065150 
065153 
065160 
065166 
065174 
065201 
065206 
065214 
065222 
065225 
065232 
065240 
065246 
065254 
065262 
065270 
065276 
065304 
065312 
065320 
065326 
065334 
065342 
065345 
065352 
065360 
065366 
065374 
065402 
065410 
065415 
065422 
065430 
065436 
065441 
065446 
065454 
065462 
065470 
065476 
065504 
065512 
065520 
065521 
065526 
065534 
065542 
065550 
065556 
065564 
065572 
065600 
065606 


11-AUG-76 00:00 


054524 
047117 
041455 
006476 

114 
041440 
042116 


042040 
051104 
020116 
042507 
052101 
051503 

116 
041040 
020067 
005015 

104 
040520 
051516 
070124 
044522 
041040 
020105 
044503 

012 

102 
020105 
051117 
020105 
047111 
025052 
044516 
020052 
047522 
051117 


042520 
051124 
036040 

012 
043505 
046517 
020123 
005015 
020116 
051505 
053111 

012 
020116 
044522 
041501 
043122 
045503 
020104 
042040 
047040 


047522 
053111 
047101 
020124 
051511 
005015 
041440 
020105 
051117 

012 
052101 
052124 
046440 
042502 
052124 
020131 
054105 
042523 


043105 
042520 
040515 
042524 
006507 
053452 
043516 
043111 
042503 
044040 


041440 
046117 
041536 


046101 
040515 
051101 

012 
020055 
020124 
020105 


020055 
042524 
026113 
020131 
020054 
042524 
044522 
005015 
020040 
052123 
044524 
020116 
020105 


020055 
020120 
020105 
020104 
052123 
044524 

012 
047101 
026460 
040440 


020101 
051105 
051525 
053440 
047105 
044124 
051105 
00652? 


051117 
043122 
041516 
0£2123 
005012 
051101 
025052 
0*0040 
051523 
046101 


*e2 DUMP MEVORY 


eASCIT 


eASCIT 


eASCIT 


eASCIT 


eASCIT 


eASCIT 


eASCIT 


eASCIT 


eASCIT 
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* 


SEG 0249 


/LEGAL COPRANDS ARES /<15><12><12> 


/Ttu TEST DRIVE &/<15><12> 


/Wk - WRITE PACK, VERFY PACK, ARD TEST DRIVE B/<1*><12> 


‘Su 


GET STATISTICS OW DRIVE 8/<15><12> 


/O0n DROP DRIVE MW AND GET STATISTICS/<15><12><12> 


46 CAN PE G-7 CR A/<1®><12>¢129 


/DATA PATTERNS PUST BE WRITTEN PY TRE EXERCTSFE/<15><12> 


/BEFORE PERFORMANCE TESTING/<15><12><12> 


/***MARNING*** TF PROCESSOR HALT CURING DATA TRARSFER/<1£9<172> 


4 











RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30€1046) O1-CEC-77 14315 PAGE 226 
DZR6PB.Pil 11-AUG-76 00:00 eee DUMP MEMORY *** SEG O26 


10508 065614 020124 052504 044522 

10509 065622 043516 042040 052101 

10510 065630 020101 051124 047101 

10511 065636 043123 051105 005015 

10512 065644 020040 020040 052040 eASCIT / TO DRIVE, BAD ECC MAY BE WRITTEN OW PACK./<15><12> 
10513 065652 020117 051104 0*3111 

10514 065660 026105 041040 042101 

10515 065666 042440 041503 046440 

10516 065674 054501 041040 020105 

10517 065702 051127 052111 042524 

10518 065710 020116 047117 050040 

10519 065716 041501 027113 005015 

10520 065724 020040 020040 042040 eASCIZ / ORIVES PUST BE DROPPED BY FROGRAM OR WITH CROP COPPABT/<i£><129¢12 
10521 065732 044522 042526 020123 

10522 065740 052515 052123 041040 

10523 065746 020105 051104 050117 

10524 065754 042520 020104 054502 

10525 065762 050040 047522 051107 

10526 065770 046501 047440 020122 

10527 065776 044527 044124 042040 

10528 066004 047522 020120 047563 

10529 066012 046515 047101 006504 

10530 066020 005012 000 

10531 000001 END 


c¢ 





































<q 

RE611/RKO6 PERFORMANCE EXERCISER MAINDEC DZRO6OP-8 WACY11 30€1046) O1-DEC-77 14315 PACE 230 

DZR6PB.P11 11-AUG-76 00:00 SYMBOL TARLE sto C221 1 

ABASE = 177440 ASN3$ 013530 BUFADD= 065202 dureur 001622 ERCVY1 037464 

ABNORM 024766 ASN4$ 013540 BUFER1 022760 D¥O) = =-« 000040 EBCUY2 0642262 é 

ABN0O0O 025054 ASWREG= 000000 BUFFAL 022114 DPA = 600001 EREPRC 001562 

APNOO1 025114 ATESTW= 000000 BUFREL 022316 DRDY = 000200 EGRPRO 001330 

ACDW1 = 000000 AUNIT = 000000 BWATTQ 0012320 prop 012716 ERAVEC= COOCjC4 < 

ACDW2 = 000000 AUSUR = 000000 B.BA16= 000001 DPCPDY 012172 ESE000 627554 

ACLO = 000010 AVAILQ 001314 B.BA17= 000002 DPOT = 000040 ERROO1 057601 

ACPUOP= 000000 AVECT1= 120210 B.CDT = 000004 DPPAR = 000010 ERROO? O5764E € 

ADDWO = 000000 AVECT2= 000000 B.CPMT= 000020 DRPDRY= 002000 £65003 657675 

ADDW1 = 000000 A-ABNL 001454 CALSEC 035014 DRUCET 001626 ERE004 0£7730 

ADDW10= 000000 A-CONT 001456 CALWC 036412 DRYDSC= 00040 EPROOS 057774 & 

ADDW11= 000000 A.WORM 001452 CCLR = 100000 DPVARD= 000020 855006 C60Cz2 

ADDWi2= 000000 BAI = 000020 coT = 002000 DRUMSR= 000007 EER0O? 060051 

ADDW13= 000000 BA16 = 000400 CERR = 100000 DRYPDT= 000004 EEROOF CEC112 € 

ADDW14= 000000 BA1? = 001000 CFuT = 010000 ORVPCS= 000002 £68009 060157 

ADDW15= 000000 BDSECT 041560 CHKADD 024506 DRYSTT 0655615 EfROI2 060214 

ADDW2 = 000000 BINOCT 052144 CHKCLK 042574 DRYSZD= 010¢00 EfRO12 0€0237 | 

ADDW3 = 000000 BITO = 000001 Ctmrra 001324 DRVUSE= 000001 656014 066371 

ADDW4 = 000000 BITOO = 000001 CLEAR = 000105 DRY = 006200 EBRO1S 660422 

ADDWS = 000000 BITO1 = 000002 CLKFLG 001374 DR.CLR= 000005 EGRO1G CEC44E < 

ADDW6 = 000000 BITO2 = 000004 CLKFRQ 001253 DR.SEL= 000001 EBROL? 060476 

ADDW7 = 000000 BITO3 = 000010 CLETINT 042666 osc = =-« 040000 £68020 666532 

ADDWa = 000000 BITO4 = 000020 CLOCK 042760 DSuR = 177270 EBRO21 060545 q 

ADDW9 = 000000 BITOS = 000040 CLR = 000040 DIBAIT= 100000 8fR022 CEeCtes 

ADEVCT= 000000 BITO6 = 000100 CMDTO = 000100 OTE = 010000 668023 066631 

ADEVM = 000000 BITO7 = 000200 CYPBUF 023036 DTYE = 000040 E6RO24 060650 q 

AENY = 000000 BITOS = 000400 CNTCNT 001624 D.AWCK= 000000 EeR025 CEecEee4 

AENVM = 000000 BITO9 = 001000 CHTRL1 026426 D.CERT= 006012 E5RO26 CEC7C4 

AFATAL= 000000 BIT1 = 000002 COE = 001000 DeCTRA= 077777 ERRO27? 060744 <q 

AVADR1= 000000 BIT10 = 002000 CONCLR= 000176 D-CTRL= 177770 EBRO2e CECTE? 

AMADR2= 000000 BIT11 = 004006 COWERR 036524 D.MRCL= 000000 £65030 061023 

AMADR3= 000000 BIT12 = 010000 CONHUN 043234 DeMNSC= 000000 EBRO31 0€1043 <q 

AMADR4= 000000 BIT13 = 020000 CONTRL 026022 D.MRTR= 000000 E6R032 0€1¢57 

AMA“S1= 000000 BI114 = 040000 CPUID 001364 CoMRCL= 000632 £65033 061074 

AYA¥S2= 000000 BIT15 = 100000 cR = 000015 DeMESC= 000025 EFRO34 0€1103 <q 

AMA¥S3= 000000 BIT2 = 000004 CRLF = 000200 DeNXTR= 000007 ERROIS CE1216 

AMAYS4= 000000 BIT3 = 000010 CTO = 004000 D.KATE= 000002 E55036 661132 

AMSGAD= 000000 BIT4 = 000020 C.IWIT 047216 D.SRET= 600005 E6R037 061146 <q 

AMSGLG= 000000 BITS = 000040 C.0PT 051240 D.UERT= 000005 ERRO3® 061177 

AMSCTY= 000000 BIT6 = 000100 CeRTRN 050664 CoUTHI= 077777 £66039 C612¢7 

AMTYP1= 000000 BIT? = 000200 C.SPEC 047746 D.WTLO= 177770 EFRO40 061224 <q 

AMTYP2= 000000 BIT® = 000400 DATERR 025100 ECCCOR 025634 BERC42 0€1724 

AYTYP3= 000000 BITS = 001000 DCK = 100000 ECCPAT 001616 258043 GE1752 

AWTYP4= 000000 BLAWKS 057551 DCLO = 000020 eccw = 02000C E6RO44 G€127C q 

APASS = 000000 BPTVEC= 000014 DDISP = 177570 ECH = 000100 ERRO45 0€12CE 

APRIOR= 000240 BSBA 001656 DDT = 000400 EC3$ 037£26 ERRO46 66123721 

APTCSU= 000040 BSCYLN 001652 DECRIN 053452 EC4s 037752 EFRO47? 661241 <q 

APTENV= 000001 BSE = 000200 DESL = 000010 ECSS 040056 ERRO4® 0€1355 

APTSIZ= 000200 BSSECT 001650 DETOFF 036730 EC6S 040607 ERROSO 06€1367 

APTSPO= 000100 BSTRAN 041344 DI = 040000 EC7$ 04111C EFROS] CE14CE <q 

ASNORM 013370 BSTRCK 001651 DISPLA 001142 EWTVEC= 000030 ESR0S2 061476 

ASNI$ 013446 Bsuc 001654 DISPRE 000174 ERCOKNT 001560 ERROS? CE1EC4 

ASN2$ 013500 BSWORD 001660 DLT = 100000 EPCWY 031224 EBROS4 Cé1E45 | 
<q 
< 








€ 

RK611/RKO6 PERFORMANCE EXERCISER MAINDEC DZR6P-8 MACY11 30€1046). 01-DEC-77 14315 PACE 231 

@B OzR6PR.P11 =: 11-auc-76 00:00 SYMBOL TABLE SEC 02°32 q 
ERROS6 061613 E.NOAT= 000002 I-HDAL 044400 OPISTT 030570 PAR014 057270 

@B ERROS7? 061626 E.SCLR= 000040 IeINTR 043470 OCPRCHD 011526 BaR01S 0£7277 9 
ERROS® 061667 E.UATT= 000004 IeISRL 001502 CPROOO 0*§137 BAROIG C£73GE 
ERROS9 061744 E.UDAT= 000010 I-ISSU 046314 OPROO1 055154 P9R017 057314 

@B ERROGO 062015 E.UWLD= 020000 e100 043777 CPROO? 055157 PeRO1e 07232 < 
ERRO62 062041 E0$ 032170 TeRTRN 046214 CPROO3 055172 FAROIS 647250 
ERRO64 062066 E1$ 032332 1.STAT 046770 OPROO4 055205 £98020 057357 

@E ERROGS 062076 E10$ 034512 IeSTOR 046536 OPROOS 055231 pen021 0£7812 € 
ERRO66 062121 E2$ 033034 I.UNLD 045722 CPROOG 055251 GPSCHT 0C13SE 
ERRO67 062141 E3$ 033372 LDDATA 022532 OPROO? 655317 FIT = 000020 - 

@BERRO70 062162 E4$ 033530 LDEZAR 020166 OPpROOe® 055247 PATTA® 004876 € 
ERRO71 062205 ES$ 034240 LF = 000012 GPRO1O 6055427 £970 604636 
ERRO72 062231 FBLKC 001664 MAIN 011270 OPRO11 055446 BeT1 0€4736 

@B ERRO73 062252 FRLKT 001666 MAXBUF 001354 OPRO12? 055451 PAT10 005636 C 
EPRO74 062277 FLAG 001361 MCLE = 000400 OPRO13 055476 FaT1i 005736 
ERR100 062342 FNTE = 000020 MDS = 001060 OPRO14 055540 PIT12 CC6C36 

@B ERR101 062453 GEWERT 020640 MEMBAS= 172100 OPRO1S 055562 PAT13 606136 | 
ERR102 062535 GETBUF 022016 MEWERR 051642 or = 006200 fAT14 006236 
ERR10@ 062543 GETCUR 036150 MENVEC= 000114 CYLYLD 601365 £9715 66336 

@B erriii 062554 co = 000001 MERD = 001000 O.QVER 001507 PAT16 00643€ <q 
ERR200 062602 HCRC = 000400 MESMSK= 000017 O.RTRE 051620 FAT17 ©6006 £36 
ERR201 062642 BDBUFF= 064776 NEUD = 002060 C.WAIT 001462 £972 6C5C36 

@B eRR202 062712 HDR.AD 001476 MIND = 000200 PACK = 000103 eat2 00513€ t 
ERR203 062750 HDR.CT 001500 MINUTE 001370 PARCYL 001576 pata 665236 
ERR204 063003 HEADI1 001642 MSP = 000100 Pakw 015756 27s GC5336 

@B ERR205 063040 HEAD2 001644 M.CADD= 017760 PARMDY 012062 FAT6 005436 € 
ERR?06 063073 HEAD3 001646 M.CDIF= 017760 PaRwO 001737 £99? 0c5836 
ERR207 063127 HELP 064776 N.DRY = 000007 Page, 0602210 FPLET CC1520 

@B err20e8 063172 HLTOOO 030472 M.HEAD= 007000 PaRw10 004512 PESVAL= 001060 | 
ERR209 063223 HOUR 001366 N.ID = 000003 PARW2 007466 FCA Os = «G04CCO 
ERR210 063243 HT = 000011 M.PAR = 100000 PARR3 0602744 FCO == «-«O10CCO 

@BeRR211 063274 H¥RC = 000400 M.SECT= 000760 PaR™4 003222 PERINY 001360 < 
ERR212 063303 7 001352 M.SER = 077770 PaRwS 002500 PERTOc 001275 
ERR213 063312 H.HEAD 001503 WED = 010000 PARMG 003756 FCE = OC7660 

@B ERR214 063363 IDAE = 002000 WEN = =_ (004000 PAR? 004234 FIP = 020060 q 
ERK300 063401 IE = 000100 WERSTT 070522 PARSEC (C01€06 ElaG = 1977997 
ERR201 063500 ILC = 000001 NOCRK = 000400 FARSRT 006636 EIGCVE= COO740 

@B ERR3I02 063560 ILF = 000004 WODSC = 004000 PARTRE 001602 PCSCHD 001662 q 
ERR303 063567 ILLCMD 055131 NORPAL 023676 PAR.EW= 000001 PEOSTT 075274 
ERR304 063630 ILLCOY 055100 WORWL 024272 PAROOO 0*6£57 FREBWE 035226 

@B ERR30S 063643 INTMSK 001510 WOR™2 024330 PAROO] CS56E03 PREXAR C17£S2 q 
ZERR306 063656 INTR = 000300 NXF = 000004 PAROO2 056610 PRGSRT OCéEE? 
ERR400 063671 IOTVEC= 000020 OCTRIN 053316 PAROO3 656633 FRIGUP G7267¢4 

@BExaAPEA 001612 IR = 000100 OCTSTG 052240 PAROO4 0656653 PRIREG 625326 <q 
E.CCLP= 000001 I-AERP 045452 OFFW¥12= 000260 PAROOS 056674 PRISER 027¢6¢ 
E.CERR= 001000 IeATTN 044740 OFF¥4 = 000220 PAROOE 056717 PRISTT G72S*SC 

@il E.cLat= 000020 IeCCLR 046232 OFFS = 000240 FAROO? 656751 PRITIV 643072 q 
E.CwTO= 040000 I.CSTS 046664 OFFP12= 000060 PAROOS 057014 FFI000 027242 
E.CONT 001460 I.CST1 046706 OFFP4 = 000020 PAROOS 057061 FRICOL 0272:2¢ 

@i E.DLT = 000400 I.DUAL 046026 OFFPS = 000040 PaAkOIO 57110 FRICO2 627476 q 
E.DPAR= 002000 IeERR 044154 OFFSET= 000115 PpRO11 657155 FE1100 02771€ 
E-ILLD= 000100 I.EPRA 044134 OFS? = 000004 PaRO12? C¢57715 PRI200 20076 

@B E.uDS = 100000 I-EPRC 044142 OPI = 020000 PAROL3 657262 FESTAT C25E€CE q 

€ q 

EY 
€ 





RE611/RFO6 PERFORMANCE EXERCISER PAINDEC DZR6P-P 
11-AUG-76 00:00 


DZR6PB.P11 

PRO = 000000 
PRI = 000040 
PR2 = 000100 
PR3 = 000140 
PR4 = 000200 
PRS = 000240 
PR6 = 000300 
PRT = 000340 
PS = 177776 
PSW = 177776 


PYRSRT 007150 
PWRVEC= 000024 
P.ASOF= 000032 
P.ASSN= 000210 
P.AWCK= 000077 
P.A00 = 000040 
P.A01l = 000044 
P.A10 = 000050 
P.All = 000054 
P.BAHI= 000007 
P.BALO= 000010 
P.BAR = 000024 
P.BFCP= 000222 
P.BUFF= 000145 
P.B00 = 000042 
P.B01 = 000046 
P.810 = 000052 
P.B11 = 000056 
P.CERT= 000100 
P.CMLG= 000220 
P.C¥ND= 000001 
P.CSl = 000016 
P.CS14%= 000007 
P.CS2 = 000020 
P.CYLN= 000002 
P.DCYL= 000030 
P.DPAT= 000121 
P.DRYN= 000000 
P.DS = 000036 
P.DSTT= 000150 
P.DTS = 000026 
P-ECMP= 000117 
P.EPAT= 000062 
P.EPOS= 000060 
PER = 000034 
P.ERAD= 000217 
P.EPHD= 000214 
PeERR = 000212 
P.EXAR= 000232 
P.HARD= 000200 
P-IERC= 000120 
P.LOMD= 000135 
PeLCYL= 000136 


(ee ESE 


P.LOPT= 
P.LSEC= 
P.LTRK= 
P.LUC = 
P.MNCL= 
P.MWSC= 
P.METR= 
P.MXCD= 
P.MXCL= 
P.MxXSC= 
P.MXTR= 
P.MXUT= 
P.WER = 
P.NODR= 
P.WOPT= 
P.WRD = 
P.NSKI= 
P.MURT= 
P.OFST= 
P.PKSR= 
P.PRST= 
P. QLuK= 
P.RATE= 
P.RBAH= 
P.RBAL= 
P.RCMD= 
P.RCYL= 
P.RDOPT= 
P.RECT= 
P.RERD= 
P.RSEC= 
P.RTREK= 
P.RUC = 
P.SECC= 
P.SECT= 
P.SEEK= 
P.SERL= 
P. SKET= 
P.S¥PL= 


000144 
000140 
000141 
000142 
000066 
000074 
000072 
000106 
000070 
000075 
000073 
000112 
000206 
000152 
000204 
000164 
000202 
000156 
000006 
000226 
000014 
000064 
000076 
000134 
000132 
000123 
000124 
000122 
000146 
000147 
000126 
000127 
000130 
000176 
000004 
000211 
000224 
000104 
000116 
000174 
000172 
000005 
000102 
000012 
000022 
015762 
017756 
020054 
020070 
020104 
017770 
020002 
0270014 


MACY11 30(1046) 01-CFC-77 
SYMBOL TABLE 


PSS 

P6$ 

P7$ 

Pes$ 

Pos 
QNEWSU= 
QUESHK 
Q.INIT= 
Q. POP 
Q.PUSH 
Q.R*OV 
Q.SRCH 
RDALHD= 
RDCHRR = 
RDDATA= 
RDGATE= 
RDHEAD= 
RDLIB = 
RDSTAT= 
RDY = 
RECAL = 
RELEAS= 
RESTRT 
RESTO 
REST1 
REST2 


RFECPS= 
RKECPT= 
RKER = 
REMP1] = 
REMR2 = 
REMRZ = 
REPAT = 
REPOS = 
RKPRI 
REVEC 
Rkwc = 
RLS = 
RSTAT 
RTYBA 
RTYCMD 
RTYCYL 


020022 
020026 
020034 
020042 
020050 
000000 
057536 
040000 
050766 
050706 
051126 
051042 
000164 
104402 
000121 
100000 
000125 
104403 
000141 
000200 
00011? 
000140 
006646 
007614 
011214 
011230 
000010 
000016 
000064 
001444 
000000 
000010 
000006 
0000724 
000020 
000020 
000012 
000030 
000032 
000014 
000026 
000034 
000036 
000032 
000030 
001450 
001446 
000002 
000010 
036200 
001630 
001641 
00163€ 


RTYSCH 
RTYSEC 
RTYTEE 
atyuc 


14315 PAGE 232 


001€40 
001€34 
00163 
001632 


RE =V00CC0E 
a? 22000007 


SAUSUR 
SCLR = 
SECOND 
SEEK = 
SELORV= 
StI = 
SRISTT 
sorcue 
SPaR = 
SPOLSE= 
SPTSPL= 
STACK = 
START 
starts 
STAT 
STaTovV 
statis 
STaToo 
STELHT= 
sTT000 
s71001 
ST1002 
sTtT003 
STT004 
STTOOS 
571006 
571007 
STTOOF 
STT009 
stt010 
5171011 
s11012 
571012 
5s1115 
STT100 
STT2$ 
51155 
SUSCLF= 
SURECY 
SVAL = 
SUR 
SWREG 
swo 
swoo 
swol 
S¥o2 
$wo3 


+ 


001404 
000040 
001372 
€0c117 
000101 
000002 
630554 
001362 
620000 
000C20 
000111 
001100 
C06656 
007240 
012777 
012352 
001€27 
013004 
177774 
055644 
055672 
ossvis 
055742 
055764 
056017 
656033 
056047 
056072 
656117 
056165 
056205 
056232 
056245 
026607 
055667 
930626 
070666 
000177 
035560 
100coc 
001140 
C0C176 
000C061 
000C01 
006062 
000004 
o00cic 


suo4 
suce 
SWOé 
$807 
svoe 
soo 
$bi 
$¥10 
$011 
$b12 
$¥13 
s¥i4 
suis 
S¥2 
$u3 
su4 
sus 
Sb6 
su7 
Sué 
sus 
$¥S000 
s¥s001 
$¥S002 
$¥S003 
S¥S004 
s1¥s005 
$¥S00€ 
$¥S007 
S¥S00® 
$¥S009 
svso0ic 
$.ACLC= 
S.BRHP= 
S$ BRKE= 
S.CART= 
$.OCLC= 
$.CIB = 
$-DOOR= 
SORA = 
$.CKCT= 
S.DRY = 
$-OSC = 
$.#LT = 
S.FCR¥= 
S.FWD = 
S.HDFL= 
$.8CH¥= 
S-ICYL= 
S.1LF = 
SeLIMD=. 
S-LCAC= 
S-PAD = 


0c0cz0 
cccc4e 
60C1¢0 
0C02C0 
ccc4co 
ocicce 
Gcccc2 
oczcce 
6c4Cco 
6106CC0 
czccco 
646CCO 
100060 
000004 
ococic 
ccocsc 
occe40 
ccecice 
coc2zcc 
006400 
ocicco 
Gf625C 
626260 
056260 
626332 
05633€ 
626270 
CS646E 
6$6424 
026451 
6£6é£17 
G£6*43 
0c01¢60 
6ccice 
c4accce 
000400 
010CCO 
CC2cce 
000200 
ccoc4c 
c2ccce 
000200 
c4ccco 
coc2cc 
0c1cco 
oc.cce 
ccec2ce 
€C0040 
ccccac 
cccace 
G2ccce 
cicece 
cCCc4ce 


S&C C2t3 


Fy 
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S-SPIN= 
S.SPLS= 
$.SPOF= 
S.TYPE= 
S.UNLD= 


S.WCLK= 
5. 6472 
SeWLE = 
S.WPL = 
S.XDOK= 
SeXERR= 
$1$ 

$2$ 

$3$ 

545 

55 

S6$ 

575 

ses 
TeITVF= 
TEST 
TESTOV 
TESsT1 
TIMHR 
TIMMIW 
TIMOUT 
TIMSEC 
TIMO00 
TIM001 
TKVEC = 
TMPCNT 
TMPSEC 
TMPTRE 
TPVEC = 
TRAPVE= 
TRTVEC= 
TSTDEF 
TSTDRP 
TYPE = 
T.ASOF 
TBA 


e APS. 


010000 
002000 
001000 
020000 
004000 
004000 
020000 
000020 
002000 
010000 
010000 
001000 
000400 
040000 
040000 
000100 
000040 
000100 
004000 
004000 
000020 
001000 
011060 
011072 
011122 
011160 
011166 
011172 
011200 
011206 
000014 
013250 
011706 
013324 
001376 
001400 
025172 
00140? 
063727 
063734 
000060 
001°64 
001572 
001566 
000064 
000034 
000014 
020116 
036714 
104401 
00142? 
001414 


066027 
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T.CONT= 
T.CSsi 
T.CS2 
TDA 
T.DB 
T.o0C 
T.0LT = 
T.D0S 
T.ER 
T.MR1 
T.MR2 
T.MRZ 
T-NER = 
T.PAT 
T.POS 
T.UCR 
UEXATT= 
OFE = 
UBLOAD= 
UNRECY 
ONS 
UPE 

vw 

WCE 
WLE = 
WROATA= 
WRHEAD= 
URL = 
WPTCHK= 
URTEPK 
WRICAT= 
WRTVER 
wvos 
wvis 
wv2s 
wvss 
wv¥9Ss 
W.DRYV 
woMILT 
WUoMIM 
wUoMTIM 
&.SEC 
WU. TIME 
BUCK = 
w.WTCH 
&.8SEC 
SAPTHD 
$atyYc 
satYl 
$aTY3 
Ssatyv4 
$auTosB 


000012 
001406 
001410 
001416 
001442 
001420 
001000 
001426 
001424 
001430 
001432 
001434 
000020 
001440 
001436 
001412 
000010 
000400 
000107 
030724 
040000 
070000 
000100 
040000 
004000 
000123 
000127 
004000 
000131 
012526 
040000 
015076 
015140 
015626 
015640 
015750 
015754 
001540 
001466 
001474 
001464 
001470 
001506 
000200 
043314 
001472 
001000 
054612 
054566 
054574 
054604 
001134 
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SBASE 
SBDADR 
$BDDAT 
SPELL 
$82D 
scowl 
$cDw2 
$CHARC 
SCMTAC 
$Ccu3 = 
$CNTLC 
$CHUTLG 
S$CUTLU 
$cPuoP 
$CRLF 
$0820 
$DOWO 
$0owl 
$0DW10 
$0D0W11 
$DDW1? 
$00413 
$00w14 
$opwis 
$DDW2 
$0DW3 
50Du4 
50005 
50Du6 
$0Dw7 
$00ve 
$opw9 
$DECUT 
$DECVL 
SDEVCT 
SDEVM 
Seuv 
SENVM 
SERFLG 
SERMAX 
SERPPC 
SERRTB 
SERTTL 
SETABL 
SETEND 
SPATAL 
$FFLG 
$PILLC 
S$FILLS 
SCDADR 
$GODAT 
S$fD = 


001244 
001122 
001126 
001160 
054406 
001250 
001252 
052140 
001100 
000000 
053311 
052662 
05265¢ 
001216 
001165 
054344 
001254 
001256 
001300 
001302 
001304 
001306 
001310 
001312 
001260 
001262 
001264 
001266 
001270 
001272 
001274 
001276 
05445¢ 
054552 
001200 
001246 
001210 
001211 
001103 
001115 
001116 
001314 
001112 
001210 
001314 
001172 
055032 
001156 
001155 
001120 
001124 
000060 


SRriet?e 
ShInuP 
$uIoct 
SIcat 
STuTac 
S$TTEns 
$le 
SLFLCG 
$lacse8 
S$ULKCSE 
$LKs 
$LLVEC 
$lcuur 
$LPaDR 
SLPERR 
$LPVEC 
$tscs 
$LS08 
$LsTad 
S$PADA1 
$PADR? 
$PadR? 
$PADR4 
$PaIL 
$vawsi 
$hars2 
$vars3 
S$PAPS4 
$PBADF 
$PFLC 
SMREW 
$¥scat 
SPSCLG 
$¥scty 
$¥sWr 
$¥TVP1 
S¥TYP2 
$¥tyve3 
S¥TYP4 
S$MULT 
SRULL 
$eass 
SPASTY 
$PCWEP 
S$PuRCT 
SPURDE 
$PeRUP 
$aues 
SPARD 
$8 DCHR 
$RCLIN 


001000 
054276 
053450 
001104 
001135 
001114 
001166 
055031 
001236 
601334 
001342 
001344 
6£4300 
601106 
001110 
001340 
601346 
001350 
6£3720 
001222 
001226 
001237 
601236 
001170 
001220 
001224 
001230 
001734 
001062 
055030 
05270C 
601204 
001206 
001170 
052667 
001221 
001225 
001231 
601235 
054064 
001154 
001176 
001006 
0540572 
0£ 4046 
053722 
053742 
001164 
054200 
052250 
0*2370 


$POSZ = 000031 


6£43¢2 
oocc14 
032634 
177977 
1€20¢€0 
0017172 
601174 
001146 
062717 
001144 
022742 
oocoea 
60848 26 
6s4sC2 
001152 
001157 
cc1ise 
GtSC34 
OfScse 
ccccca 
0*5070 
ocicc4s 
66112 
O£2€24 
051662 
622674 
0£2142 
0013607 
0c1icic 
001214 
001240 
001242 
054412 
G€6éC? 
ccicce 
064745 
064237 
€¢4770 
C64442 
064052 
000226 
606224 
CE 4546 
O€4ESC 
C64643 
CE4ESE 
C€4€71 
C4704 
6€4717 
€€4737 
ce4cse 


e+ 
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ERPOPS DETECTED: 0 


7 DZREPB/ SOL/EQ: QHEWSW=DRIVES, DUMP, DZROPB 
RUN-TIME: 30 29 1 SECORDS 

RUN-TIME RATIOS 1457/61=23.6 

CORE USED: 42K (83 PAGES) 








